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Turbo C, 
Turbo Basic, 
Turbo Pascal and 
Turbo Prolog: 
technical 
excellence 


46 Borland International’s Turbo Pascal, Turbo Basic 
and Turbo Prolog automatically identify themselves, by 
virtue of their ‘Turbo’ forenames, as superior language 
products with a common programming environment. 
The appellation also means to many PC users a ‘must 
have’ language. To us Turbo C looks like a coup for 


Borland. Garry Ray, PC Week 99 


BI-1131A 


Turbo Prolog: 
The Natural Language of 
Artificial Intelligence 


hether you're a first-time 
\V/ programmer or an expe- 
rienced one, Turbo Prolog’s 
natural implementation of Artifi- 
cial Intelligence soon shows you 
how to build expert systems, nat- 
ural language interfaces, custom- 
ized knowledge bases and smart 
information 
management 
systems. 


Turbo Prolog and Turbo C 
work hand-in-hand 

Turbo Prolog® interfaces per- 
fectly with Turbo C® because 
they’re both designed to work 
with each other. 

The Turbo Prolog/Turbo C 
combination means that you can 
now build powerful commercial 
applications using two of the 
most powerful languages 
available. 


Turbo Prolog’s development 
system includes: 
 Acomplete Prolog compiler that 

is a variation of the Clocksin and 
Mellish Edinburgh standard 
Prolog. 
™ A full-screen interactive editor. 
(¥ Support for both graphic and text 
windows. 
[¥ All the tools that let you build 
your own expert systems and 
AI applications with un- 
precedented ease. 


All Borland products are trademarks or registered trademarks of Borland Interna- 
tional, Inc., or Borland/Analytica, Inc. Other brand and product names are trade- 
marks or registered trademarks of their respective holders. 

Copyright 1987 Borland International BI-1I31A 


&& An affordable, fast, and 
easy-to-use language that 
will delight the newcomer 
... You experienced Prolog 
hackers will likewise be 
delighted, if not astonished, 
by the features and per- 
formance of the Turbo 
Prolog.development 
environment. 

Turbo Prolog offers gener- 
ally the fastest and most 
approachable implementa- 
tion of that language. 


Darryl Rubin, Al Expert IF 


How Turbo Prolog’s new Tool- 
box adds 80 powerful tools 
and 8000 lines of source code 


In keeping with Borland tradi- 
tion, we’ve quickly added the 
new Turbo Prolog Toolbox™ to 
Turbo Prolog. 

With 80 tools and 8000 lines 
of source code that can easily be 
incorporated into your own pro- 
grams—and 40 sample programs 
that show you how to put these 
AI tools to work—the Turbo 
Prolog Toolbox is a highly intelli- 
gent, high-performance addition. 
Only $99.95! 


Turbo Prolog Toolbox 
features include: 


Business graphics generation: 

boxes, circles, ellipses, bar charts, 

pie charts, scaled graphics 

Complete communications pack- 

age: supports XMODEM protocol 

File transfers from Reflex,° dBASE 

Ill,° 1-2-3,° Symphony* 

[7 A unique parser generator: con- 

struct your own compiler or query 

language 

[MW Sophisticated user-interface design 
tools 

[¥ Contains 40 example programs 

Easy-to-use screen editor: design 
your screen layout and I/O 

[ Calculated fields definition 

[¥ Over 8,000 lines of source code 
you can incorporate into your own 


programs 


Turl 
The most pow 
compi 


ur new Turbo C generates 
O fast, tight, production- 
quality code at compilation 
speeds of more than 13,000 lines 
a minute! 
It’s the full-featured optimizing 
compiler everyone has been wait- 
ing for. 


Switching to Turbo C, or 
starting with Turbo C, you 
win both ways 
If you’re already programming 
in C, switching to Turbo C will 
make you feel like you're riding a 
rocket instead of pedaling a bike. 
If you're never programmed in 
C, starting with Turbo C gives you 
an instant edge. It’s easy to learn, , 
easy to use, and the most efficient’ 
C compiler at any price. 


Only $99.95! 


4G Turbo C does look like 
What We've All Been Waiting 
For: a full-featured compiler 
that produces excellent 
code in an unbelievable 
hurry . .. moves into a class 
all its own among full- 
featured C compilers’. . . 
Turbo C is indeed for the 
serious developer .. . One 
heck of a buy—at any 


pr ice. Michael Abrash, 
Programmer’s Journal J b | 


0 C: NEW! 
erful optimizing 
ler ever 


Sieve benchmark 
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Benchmark run on an IBM PS/2 Model 60 using Turbo C version 
1.0 and the Turbo Linker version 1.0; Microsoft C version 4.0 and 
the MS overlay linker version 3.51. 


Technical Specifications 
® Compiler: One-pass optimizing com- 
piler generating linkable object 
modules. Included is Borland’s high- 
performance Turbo Linker.” The object 
module is compatible with the PC- 
DOS linker. Supports tiny, small, com- 
pact, medium, large, and huge 
memory model libraries. Can mix 
models with near and far pointers. 
Includes floating point emulator 
(utilizes 8087/80287 if installed). 
Interactive Editor: The system 
includes a powerful, interactive full- 
screen text editor. If the compiler 
detects an error, the editor auto- 
matically positions the cursor approp- 
riately in the source code. 


Development Environment: A power- 
ful “Make” is included so that manag- 
ing Turbo C program development is 
highly efficient. Also includes pull- 
down menus and windows. 


ral 


Links with relocatable object modules 
created using Borland’s Turbo Prolog 
into a single program. 

Inline assembly code. 

Loop optimizations. 

Register variables. 

ANSI C compatible. 

Start-up routine source code included. 


Both command line and integrated 
environment versions included. 


Q QAARRR 


License to the source code for Run- 
time Library available. 


Join more than 100,000 Turbo C 
enthusiasts. Get your copy of 
Turbo C today! 


Minimum system requirements: All products run on IBM PC, 
XT, AT, PS/2, portable and true compatibles. PC-DOS (MS-DOS) 
2.0 or later. 384K RAM minimum. Basic Telecom and Editor Tool- 
boxes require 640K. 


Borland International 
4585 Scotts Valley Drive, Scotts Valley, CA 95066 
Telephone: (408) 438-8400 Telex: 172373 
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Why more than 600,000 


programmers worldwide are using 


Turbo Pascal today 


Turbo Pascal’s worldwide 

success is Borland’s advanced 
technology. We created a com- 
piler so fast, that Turbo Pascal® is 
now the worldwide standard. And 
there are more tools for Turbo 
Pascal than for any other develop- 
ment environment in the world. 


Te irresistible force behind 


You'll get everything you 
need from Turbo Pascal and 
its 5 Toolboxes 


Turbo Pascal and Family are 
all you'll ever need to perfect pro- 
gramming in Pascal. 

If you’ve never programmed 
in Pascal, you’ll probably want to 
start with Turbo Pascal Tutor® 2.0, 
and as your expertise quickly 
grows, add Toolboxes like our 


e Database Toolbox® 
¢ Editor Toolbox® 
° Graphix Toolbox® 
e GameWorks® 
and our newest, 
¢ Numerical Methods Toolbox” 


And because Turbo Pascal is the 
established worldwide standard, 
3rd party, independent non- 
Borland developers also offer an 
incredible array of programs for 
Turbo Pascal. Only $99.95! 


464 Borland International's 
Turbo Pascal took the pro- 
gramming world by storm. A 
great compiler combined 
with a good editor at an 
astounding price, the pack- 
age quickly came to be 
called, simply, Turbo—and 
has sold more than 500,000 
copies. 

Stephen Randy Davis, PC Magazine 


Language deal of the cen- 
tury. PC Magazine 


For Scientists and Engineers: 
Turbo Pascal Numerical 
Methods Toolbox 


The Numerical Methods Tool- 
box is a complete collection of 
Turbo Pascal routines and ae 
grams. Add it to your develop 
ment system and you have the 
most comprehensive and power- 
ful numerical analysis capabil- 
ities—at your fingertips! 

The Numerical Methods Tool- 
box is a state-of-the-art mathemat- 
ical toolbox with these ten pow- 
erful features: 


Zeros of a function 
Interpolation 
Differentiation 
Integration 
Matrix Inversion 
Matrix Eigenvalues 
Differential Equations 
Least Squares 
Fourier Transforms 
Graphics 

Each module comes with pro- 
cedures that can be easily adapted 
to your own program. The Tool- 
box also comes complete with 
source code. So you have total 
control of your application. 


Only $99.95! BII131A 
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Turbo Basic introduces 
its powerful new Telecom, Editor 


NEW! 


and Database Toolboxes 


urbo Basic® is the break- 
T through you've been waiting 

for. The same power we 
brought to Pascal with Turbo 
Pascal has now been applied 
to BASIC with Turbo Basic. 

Compatible with BASICA, Turbo 

Basic is the high-performance, 
high-speed BASIC you’d expect 
from Borland. 


Basically, Turbo Basic is 
all you need 

It's a complete development 
environment which includes an 
incredibly fast:compiler, an inter- 
active editor and a trace debug- 
ging system. It outperforms all its 
rivals, and because it’s compatible 
with BASICA, you probably 
already know how to use it. 

Includes a free MicroCalc* 
spreadsheet complete with source 
code. Only $99.95! 


A technical look at Turbo Basic 
{ Full recursion supported 
Standard IEEE floating-point format 
Floating-point support, with full 
8087 (math co-processor) integra- 
tion. Software emulation if no 
8087 present | 
[¥ Program size limited only by avail- 
able memory (no 64K limitation) 
M VGA, CGA, and EGA support 
[iy 
wy 


Access to local, static, and global 
variables 
Full integration of the compiler, | 
editor, and executable program, 
with separate windows for editing, | 
messages, tracing, and execution | 
Compile, run-time, and I/O errors | 
place you in the source code | 
where error occurred 
[MW New long integer (32-bit) data 
type | 
Full 80-bit precision 
[¥ Pull-down menus | 
Full window management | 


&& Borland has created 
the most powerful version 
of BASIC ever. 
Ethan Winer, PC Magazine b | J 


Telecom Toolbox is a complete 
communications package which 
takes advantage of the built-in 
communications capabilities of 
BASIC—use as is or modify. 

° Pull-down menus and windows 

¢ XMODEM support 


_ © VT 100 terminal emulation 

° Captures text to disk or printer 

° PhoneBook file 

* 300, 1200, 2400 baud support 

¢ Supports script files 

° Fast screen I/O 

e Supports most of XTalk’s 
command set 

° Manual dial and redial options 
Use Telecom Toolbox to embed 

communications capabilities into 

your own programs and/or build 

your own commiunications pack- 


Database Toolbox means that 
you don’t have to reinvent the 

wheel each time you write new 
Turbo Basic database programs. 


“Trainer” shows you how B+ 
trees work. (Simply key in 
sample records and you'll see 
your index being built.) 


[¥ Turbo Access instantly locates, 
inserts or deletes records in a 
database—using B+ trees. 


{ Turbo Sort sorts data on single 
items or on multiple keys and 
features virtual memory 
management for sorting large 
data files. 


Source code included. 


age. Source code included for 
all Toolbox code and sample 


programs. Only $99.95! 


For the dealer nearest you or to order by phone call 


(800) 255-8008 
in CA (800) 742-1133 in Canada (800) 237-1136 


= 
= 
=" 
—— 


= 


INTERNATIONAL 


SUMMER BREAK SPECIAL! |. 
Buy Turbo Basic and get a FREE product. | | 
See your dealer for details! 


Editor Toolbox is all you need 
to build your own text editor or 
word processor. Includes source 
code for two sample editors. 

First Editor is a complete editor 
ready to include in your programs, 
complete with windows, block 
commands and memory-mapped 
screen routines. 

MicroStar” is a full-blown text | 
editor with a complete pull-down | 
menu user interface, and gives you | 
° Wordwrap 
* Undo last change 
e Auto-Indent 
e Find and Find/Replace with options 
° Set left/right margins 
¢ Block mark, move and copy 
° Tab, insert, overstrike modes, line 

center etc. 

Includes source code. 


Only $99.95! 
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LANGUAGE [apis 
OTE wunott oar The Five Dining Philosophers: 
iii A Scheduling Problem in Modula-2 34 
M by Dale E. Parson 


Five philosophers, five forks, five plates, five cookies—and every one 

of the thinkers is hungry. The problem is, none of them can eat 

without a fork in each hand. And if they all reach for their forks at the 

same time...well, you get the picture: deadlock. The author discusses 

this common operating system design problem and explains the 
accompanying Modula-2 program, a method for supporting the 

scheduling of concurrent processes. 5 1 


From Turbo Pascal to Assembly and Back 

by Michael Bertrand 

Sometimes there’s just no way to solve a programming puzzle without 

delving into the depths of the machine. This article shows how 

assembly language code can be integrated into your Turbo Pascal 

code and how information can be passed back and forth between 

Turbo Pascal programs and assembly language programs. 5 9 


_7 Turbo Pascal Idiosyncracies and How to Deal With Them 
by Tom Rugg and Phil Feldman 
The authors discuss seven ways to make Turbo Pascal even easier to 
use. Included are explanations of what typed constants really are 
and how to improve your program’s speed. Some of the techniques 
can be applied to other languages. 
A Math Utility Package for Pascal 69 
by Bob Zorich = 
Motivated by Turbo Pascal’s lack of mathematical capabilities, the 
author developed a shareware package called Scicalc. Designed 
primarily as a Turbo Pascal learning tool and for the development of 
a math tools library, Scicalc can also be used as a computer-based 
mathematical reference table. Many of its features will work in other 
Pascal dialects and languages. 


DEPARTMENTS 


Programming on Purpose 
Honestly, now. 


Designing With Data Bases 
Putting the relational model in perspective 


Public Domain Software Review 
dBASE becomes a SNAP!; a C graphics library 


Al-Eye 81 
In search of search 

Exotic Language of the Month Club ———_____{___ 87 
Turing: More powerful than Pascal 

ComputerVisions 95 
The making of a computer bookstore 

Product BINGO 126 
Software Revinw en a ee 03 


a Marshal Language Systems’ Marshal Pascal 
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Advertiser Index 


128 


2 COMPUTER LANGUAGE m SEPTEMBER 1987 


brilliant breakthrough J 
in SQL technology y 


XQL is a dramatic step forward 
in the history of SQL. It’s the one 
unique SQL solution that helps 
programmers break through to even 
higher levels of productivity. Power- 
ful yet easy to use, XQL minimizes 
yout coding time and lets you focus 
on building better applications. 


XQL extends the power of 
Btrieve, SoftCraft’s high-perfor- 
mance file manager, by allowing ac- 
cess to multiple records at a time. It 
frees your application from physical 
file characteristics by providing true 
relational capabilities with data in- 
dependence, data descriptions, data 
integrity and security. 


-XQL's three interface levels are 


a major advance in SOL technology. 
The first two levels, XOL primitives 


since SQL. 


for maximum 
efficiency or full 
SQL statements for 
maximum conve- 
nience, are callable 
subroutines from 
BASIC, Pascal and C. The third 
level lets you enter SQL statements 
interactively without ever having 
to write a program. 


XQL’s extensive DBMS fea- 
tures let you access data by name. 
Field order is independent of physi- 
cal location within the Btrieve 
record. Only records that pass your 
restrictions are returned — 


records built from multiple, joined 
Btrieve files. 


in the sort 
order you specify. Fields can be com- 
puted from other fields or constants. 
And you can manipulate composite 


XQL offers all 
the performance and 
reliability you’ve come to 
expect from Btrieve, includ- 
ing LAN support, fault 
tolerance, comprehensive 
documentation and expert 
technical support for trouble- 
free software development. 
Plus, you never pay royalties on 
your XOQL applications. 


Put the latest innovation in SQL 


technology to work for you. 
Contact SoftCraft. 


SoftCraft. 


ANOVELL COMPANY 
P.O. Box 9802, #917 
Austin, Texas 78766 

(512) 346-8380 Telex 358 200 


XQL, $595; Btrieve, $245; multiuser Btrieve, $595. XQL requires Btrieve and 
PC-DOS or MS-DOS 2.X or 3.X. XQL is a trademark and Btrieve is a registered trademark of SoftCraft, Inc. 
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__ saa ana 
Editor’s 
Notes 


elcome to our first special 

issue on programming with 

Pascal and Modula-2. The 
intent of this issue is to provide you with 
practical information you can put to im- 


- mediate use, with articles on interfacing 


Turbo Pascal and Assembly (“From 
Turbo Pascal to Assembly and Back”), 
tips for programming in Turbo Pascal 
(“7 Turbo Pascal Idiosyncracies and 
How to Deal with Them”), and math 
programming with Pascal (“A Math 
Utility Package for Pascal”). 

The opening article, “Five Dining Phi- 
losophers,” takes a problem that demon- 
strates the principles of deadlock and 
shows a method for supporting schedul- 
ing of concurrent processes in Modula-2. 

Our Exotic Language falls under the 
broad Pascal label also. Turing, created 
in 1982 at the University of Toronto, is 
described as a super-Pascal by the 
codeveloper and our columnist, R.C. 
Holt. The language has the features of 
standard Pascal, plus modularity and in- 
formation hiding, good string-handling 
capabilities, and dynamic parameters 
and arrays. 

On the lighter side is an interview with 
Rachel Unkefer and Dan Doernberg, 
owners of the Computer Literacy Book- 
shops in Silicon Valley. Unkefer and 
Doernberg, with their enthusiasm and 
great bookstores, are providing an excel- 
lent service to programmers. 

Our software review section covers nu- 
merous Pascal and Modula-2 products. 
Included are detailed looks at two Pascal 
compilers new since our Pascal review 
last year: Oregon and Marshal. 


Not all the reviews are in the software 
review section, however. Matthew Rapa- 
port, in his Designing with Data Bases 
column, continues where he left off in 
July with a thorough look at nine popu- 
lar DMBSs. Specifically, Rapaport rates 
these products using E.F. Codd’s 12 rules 
for relational DBMSs. Having Rapa- 
port’s tables and discussion as a guide 
should help you decide which DBMS is 
best suited for your application. 

Speaking of data bases, I’d like to in- 
troduce you to our new sister publication, 
Database Programming & Design. This 
new magazine, which premiers in De- 
cember, is the fourth in the Miller Free- 
man Publication group of software 
development magazines, which includes 
COMPUTER LANGUAGE, AI EX- 
PERT, and UNIX REVIEW. 

Database Programming & Design is a 
technical magazine for data base pro- 
grammers, designers, administrators, 
managers, and consultants and will be 
oriented primarily toward medium and 
large systems. Articles will be on such 
topics as using relational and nonrela- 
tional DBMSs, converting from one 
DBMS to another, advanced data base 
programming with fourth generation lan- 
guages, and taking advantage of the new 
productivity tools. (For more informa- 
tion, see page 120.) 

You'll even find at least one familiar 
author in Database Programming & De- 
sign: Richard Finkelstein of Codd & 


Date Consulting, who coauthored the ~  -— 


well-received “Fourth generation lan- 
guage data bases” wrap-up in the May 
issue of COMPUTER LANGUAGE. 

If you’re interested in writing or refer- 
eeing articles for the new magazine (or, 
of course, for COMPUTER LAN- 
GUAGE!), please drop me a line. 


yee [sing 


Regina Starr Ridley 
Editor 
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Interlocking Pieces: 


Blaise and 
‘Turbo Pascal. 


Whether you’re a Turbo Pascal expert or a novice, you can benefit from using 
special tools to enhance your programs, make them reliable, and give them a 
professional — look. With windows, menus, pop-up memory resident programs, 
and communications support, Blaise Computing offers you all 
<k, the right pieces to solve your Turbo Pascal development puzzle. 
Sa @POWER TOOLS PLUS" is a general purpose library of over 140 
ce a functions and procedures, like fast direct video access, general screen 
handling including multiple monitors, and EGA 43-line text mode. 
Stackable and removable windows with optional borders and 
cursor memory provide complete windowing capabilities. Pop-up 
ze ‘ menus are easily incorporated into your programs using the menu 
si ‘ = Lam management functions. 
a 4 POWER TOOLS PLUS allows you to inspect, allocate, 
and free DOS memory. Execute any program, including 
internal DOS commands, from within your Turbo 
Pascal program. 
Write general interrupt service routines in Turbo Pascal 
for either hardware or software interrupts using the 
POWER TOOLS PLUS ISR support functions. Blaise 
Computing’s unique intervention code lets you develop 
memory resident applications that take full advantage of DOS 
capabilities. With simple procedure calls, “schedule” a Turbo 
Pascal procedure to execute either when a “hot key” is pressed 
or at a specified time. 
@ASYNCH PLUS™ provides the crucial core of hardware 
interrupts needed to support asynchronous data communi- 
cation. This package offers simultaneous buffered input and 
output to both COM ports at speeds up to 9600 baud, and 
supports the XON/XOFF protocol, XMODEM file transfer 
p= and modem control functions. 
The underlying functions of ASYNCH PLUS are carefully crafted 
in assembler and drive the UART and programmable interrupt con- 
troller chips directly. These functions, installed as a memory resident 
system, require just 3.2K bytes. Complete Turbo Pascal interfaces to the 
assembler routines are provided. 
The source code is included in all Blaise Computing products and 
is efficiently crafted, readable and easy to:modify. The INCLUDE 
utility is provided to automatically determine which procedures and 
functions are required, and to compact them all into a single file to 
be included in your application. Each package is accompanied by an 
indexed manual describing each procedure and function in detail with 
example code fragments. The documentation reflects the attention to 
detail and commitment to technical support that have distinguished 
Blaise Computing over the-years. 


Turbo ASYNCH PLUS and Turbo POWER TOOLS PLUS 
support Turbo Pascal Version 2.00 and later and require 
DOS 2.00 or later. 


> Turbo ASYNCH and Turbo POWER TOOLS PLUS are 
F just $99.95 each. Buy them together for only $175.00. Or 
for only $199.00, receive PLUSPAK™ a comprehen- 


"® TOOLS PLUS and KeyPlayer — the right {7ps! Send 
pieces to put your Turbo Pascal puzzle together. 4 Enclosed § 


S shipPine 
rN & 
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2560 Ninth Street, Suite 316 Berkeley, CA 94710 (415) 540-5441 Lee="" 
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screen access; DOS file handling and 


"General screen control; paint screens 


“-ASYNCHMANAGER $175.00 


5 POWER SCREEN 
COMING SOON! General-screen manage- 
ment; paint screens; block mode data entry 
or field-by-field control with instant screen _ 
access. For Turbo Pascal. 


EXEC $95.00 
NEW VERSION! Program chaining execu- 
tive. Chain one program from another in dif- 
ferent languages; specify common data areas; 
less than 2K of overhead. : 


KeyPlayer $49,95. 
“Super-batch” program. Create batch files 
which can invoke programs and provide 
input to them; run any program unattended; | 
create demonstration programs; analyze key- 
board usage. 


RUNOFE $49.95. 
Text formatter for all programmers. Written © 

in Turbo Pascal: flexible printer control; user- 
defined yariables; index generation; and a 
general macro facility. : 


Turbo C TOOLS $129.00 
Windows; ISRs; intervention code; screen 
handling and EGA 43-line text mode support; 
direct screen access: DOS file handling and : 


more. For Turbo C. oe 


PASCAL TOOLS/TOOLS 2 $175.00 

Expanded string and scréen handling; graph- — 
ics routines; memory management; general 
program control; DOS file support and mo 
For MS-Paseal, bee 


€ TOOLS PLUS : 
Windows; ISRs; screen handling; 1 
monitors; EGA 43-line text mode; 


For MS and Lattice C version 3.00 and lat 
VIEW MANAGER 


mode data entry or field-by-field contro 
instant screen access. For C or M sca. 


Full featured interrupt driven support for 
COM ports. I/O buffers up to 64K; 

XOFF; up to 9600 baud; modem contro: 
XMODEM. For C or MS Pascal. - 


LIGHT TOOLS: ee 
Windows; ISRs; EGA 43-line 

direct screen access; DOS file hand 
more. For the Datalight C compile 
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~ RESIDENT EXPERT Pop-up Reference Guides... 


RESIDENT EXPERT (tm) 


G include <stdio.h> 


char *fgets(str,cnt, stream); 


char *str; 
int cnt: 
FILE *strean; 


==> QUERVIEN <== 


This function reads a string fron 
the input stream specified by 
3} <stream> and stores it in <str>. 


Try One And Get Our MS-DOS/PC-DOS Guide 


THE POP-UP REFERENCE 
REVOLUTION BEGINS 


How much development time could you save if 
you never had to open another PC language or 
technical reference manual again? What if you 
could just point at a compiler keyword, assembly 
instruction, or function name on your screen and 
with a keystroke have complete, authoritative 
information about language syntax, operands, 
parameters, examples, and much more? 


INTRODUCING THE RESIDENT 
EXPERT SYSTEM 


A growing library of comprehensive, disk 
resident reference guides about the PC and your 
favorite PC languages. All available instantly 
through our unique memory resident pop-up 
access system. 


VIRTUALLY EVERYTHING YOU 
NEED TO KNOW 


Each of our Compiler Reference Guides 
contains virtually everything you need to know 
to program with your preferred implementation 
of your favorite language. Language syntax, all 
library functions, complier directives, and error 
codes are thoroughly documented. 


Our PC Programmer’s Reference Guide 
documents every PC (and AT) processor 
instruction and every BIOS and DOS service 
interrupt. You'll also find tables of keyboard 
codes, line drawing, ASCII, and IBM character 
sets, and much more. 


THE SPECIALIST’S LIBRARY 


Your compiler is unique. Thats why our 
reference guides are specialized...each one 
designed for a particular vendors language 
implementation. 


Absolutely FREE! 


Free With Any Purchase! 


Our Companion Pop-up GuideTo 
MS-DOS3.2/PC-DOS 3.3 


Limited Time Offer 


QUICK DRAW ACCESS SYSTEM 


Point-and-shoot...just place the cursor over any 
term on your screen: Chances are we've got it 
fully detailed in one of our data bases. 


Fully cross indexed...if the instruction or library 
function you’re using isn’t quite right, our related 
topics cross index can help you find a better one. 


Multiple volumes on line...you can have one or 
a dozen of our pop-up reference guides on 
line...a complete library available instantly. 


THE INFORMATION YOU 
NEED...WHERE YOU NEED IT 


Our pop-up shell varies its size and shape 
dynamically, only taking as much space on your 
screen as it needs and it never covers your 
working area. You can see your work and our 
reference data at the same time. 


A COMPLETE LIBRARY...STILL 
ONLY A BEGINNING 


At Santa Rita, our commitment is to provide thes ~~ 


most accurate, extensive selection of PC 
language reference materials available. If you 
don’t see one of our guides for your favorite 
language or compiler listed below don't worry, 
we're probably working on it! 


PC Programmer’s Reference Guide... $59.00 
(with Assembly Language Guide) 


Borland: Purbo: GO) acu eer 59.00 

Borland Turbo Pascal (3.0 and below)..... 59.00 
(with Graphics & Numerical Methods Toolbox) 

Borland Turbo Prolog (1.1 and below)... .. $9.00 
(with Prolog Toolbox) 

Lattice C Compiler (3.2 and below)....... 59.00 


Mark Williams LetsC (4.0 and below)... .. 59.00 
Microsoft C Compiler (5.0 and below)..... 59.00 


SantaRita 


For the location of your nearest Santa Rita 
Software dealer, or to order direct, call us at 
1-214-727-9217. We'd like to hear from you. 


Santa Rita Software 
1000 E. 14th Street, Suite 365 
Plano, Texas 75074 


Resident Expert is a trademark of The Santa Rita Company. Borland, Turbo C, Turbo Pascal, and Turbo Prolog are trademarks of 
Borland International Inc. IBM and PC-DOS are trademarks of International Business Machines Corporation. Lattice C is a 
trademark of Lattice Inc. LetsC is a trademark of Mark Williams Company. Microsoft and MS-DOS are trademarks of Microsoft 
Corporation. 
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FEEDBACK 


More batch procedures 


Dear Editor: 

I too got a kick out of Mike Higgins’ 
“Advanced MS-DOS Batch Procedures” 
(COMPUTER LANGUAGE, Apt. 1987, 
pp. 45-49) and an even bigger kick out of 
Eric Gans’s letter “Push and pop trick” 
(COMPUTER LANGUAGE, Aug. 1987, 
p. 7). 

While I have not tried to use Gans’s 
idea with MS-DOS, I did try it with PC- 
DOS 3.1 and found a small glitch. The 
cdf must consist of cd but without the 
EOF. If the EOF is included, the append 
will not add the needed information to 
the file popd.bat. My debugging sessions 
resulted from using an editor that explic- 
itly puts in an end of file exactly where I 
tell it to. Using copy con: cdf and keying 
c, d, space, F6 produces a file consisting 
of only three characters (hex 63, 64, 20). 
This method worked perfectly, and I 
have added Gans’s trick to most of my 
batch library. (I won’t admit how I ac- 
complished this same end until now.) 

A word of caution about adding the 
PATH variable to the file. The new path 
name must include the directory contain- 
ing the popd.bat file, or the full path 
name of the popd.bat file must be used 
in the modified batch file. 

Keep up the good work. COMPUTER 
LANGUAGE is one of the few maga- 
zines that I make the time to read. 

Henry Beitz 
Symphysis Inc. 
Minneapolis, Minn. 


Dear Editor: 

The undocumented feature of MS- 
DOS batch files discussed by Mike Hig- 
gins in “Advanced MS-DOS Batch 
Procedures” is indeed documented if you 
dig deep enough. It is mentioned on p. 
502 of Microsoft’s MS-DOS Technical 
Reference Encyclopedia (deep in the 
technical nitty-gritty of the environment, 
rather than in the section on batch files). 

Robert Berdell 
New York, N.Y. 


45. 


Further clarifications 


Dear Editor: 

Your clarification of the poorly docu- 
mented DOS SHELL command (Feed- 
back, COMPUTER LANGUAGE, Jun. 
1987, p. 17) is not totally correct. It im- 
plies that the example shown is applica- 
ble to all versions of MS-DOS past 3.0, 
but the syntax shown only works on the 
DOS 3.2. Version 3.1 and below use the 
same general syntax, but the number en- 
tered is interpreted as a multiple of 16 
bytes. Furthermore, the limit for environ- 
ment space for 3.1 and below is 992 
bytes. (For DOS 3.2 the limit is 32768 
bytes.) The following lines would achieve 
identical results if used in the CON- 
FIG.SYS file: 


SHELL=C:\COMMAND.COM C:\ 
|P/E:62 (for version 3.1) 
SHELL=c:\COMMAND.COM C:\ 
[P/E:992 (for version 3.2) 
William D. Marsh 
Gales Ferry, Conn. 


Modifying source code 


Dear Editor: 

I wish to correct and supplement the 
information provided about Windows for 
Data in Michael Wilson and Donald 
Drumheller’s recent review of screen 
managers (Software Reviews,“Screen 
Managers: The sharper image,” COM- 
PUTER LANGUAGE, Jun. 1987, pp. 
115-125). 

No royalties or distribution fees are re- 
quired for end-user applications incorpo- 
rating our code under any operating 
system. Use is allowed in programming 
tools without royalties, unless the tools 
are libraries of functions concerned with 
the same programming areas as Win- 
dows for Data. 

Windows for Data is available for 
VAX VMS as well as DOS, UNIX, and 
XENIX. 

Turbo C, Microsoft C, Lattice C, and 
Computer Innovations C86 are support- 
ed. Due to lack of demand, support for 
DeSmet C has been discontinued. Sup- 


Artwork: Anne Doering 


port for Mark Williams C will be 
dropped in the near future. 

Beyond these amendments, I would 
like to comment on points raised in the 
review about documentation and source 
code. 

Wilson faulted the manuals of Win- 
dows for Data primarily because of the 
format of the reference pages. We agree 
with this criticism and are reformatting 
our reference pages for easier use. Wil- 
son did not mention that we provide 300 
pages of step-by-step tutorial and system 
information, far more than any of the 
other products reviewed. 

In making his best-value evaluation, 
Wilson, a self-declared source code fa- 
natic, appears to have based his rankings 
largely on the price of source code. He 
thus downgraded Windows for Data, , 


even though he recognized that “For full- = 


featured packages, only one package can 
be easily recommended: Vermont Cre- 
ative Software’s Windows for Data.” 
Those who unthinkingly opt for source 
code over functionality may later regret 
it. Free source code is no bargain when 
you need to modify it to accomplish de- 
sired tasks. 

In a complex system of functions, 
modifying source is fraught with difficul- 
ties. A simple change in one place can 
require a frustrating sequence of changes 
in many modules to restore the system to 
operability—and even then, hidden bugs 
may remain. 

Even successful source code modifica- 
tions create serious long-term costs. As 
soon as a customer modifies vendor 
source code, the customer (rather than 
the vendor) assumes responsibility for 
maintaining code compatibility across 
new vendor versions. As any. experienced 
programmer can testify, this is not a re- 
sponsibility to be taken lightly. 

For most, a system that can do the job 
without source code will prove thesbetter 


The Fastest C 


We challenged Microsoft-C to a C compiler duel, measuring compile, link, and execution 
times. They wouldn’t take on Optimum-C — they own it and they know how fast it is! 


DATALIGHT?’s new Optimum-C compiler 
can make your programs run up to 30% faster 
than other compilers. That’s because it’s a 
true optimizing compiler. While many 
manufacturers may claim to have optimizing 
compilers, they can’t stand up against 
Optimum-C. Their optimizers look at only 
one or maybe a few statements at a time; 
Optimum-C takes in the BIG picture, looking 
at an entire function at once. 

Optimum-C tunes each function to the 
machine by maximizing register usage while 
minimizing memory usage. Optimizations 
performed include: global common subex- 
pression elimination, register allocation 
by coloring, copy/constant propagation, 
loop induction variables, and dead code 
elimination, 


Develop Programs Faster 


To save compile time during code develop- 
ment, you can turn off the optimization. 
Then, when your program is developed and 
debugged, you can turn on the optimization 
and recompile for the fastest execution speed. 

Also included to help you with code 
development is the EZ interactive editor/ 
environment. With EZ you can compile, link, 
execute and quickly correct any syntax errors 
by letting EZ show you the erroneous source 
line and error message. 


Library Source Code and Other Extras 


Top speed is only one of the advantages you 
get with Optimum-C, You also get complete 
library/startup source code (at no additional 
charge) support for 4 memory models 
(including large model), inline 8087 code, and 
standard object files. Plus a complete UNIX 
style MAKE program and a fast screen I/O 
package. 


Speed ROM Development 


It used to be that to develop ROM code you 
had to purchase a compiler from one manu- 
facturer, a debugger from another, and other 
tools from still another. DATALIGHT has 
eliminated all the hassle by providing all the 


support tools necessary for ROM 
development. 

BENCHMARKS 

Sieve Pointer Optimize 
Optimum-C 49.3 45.7 00.9 
MSC 58.6 90.2 38.6 
Turbo-C 62.1 49.0 40.2 


ROM-it, the Unique 

ROM Development Kit 
Only DATALIGHT offers you the kind of 
support you’ll find in Rom-it, the new ROM 
support package. This unique package speeds 
up the delivery of your ROM application by 
providing many program elements that you 
used to have to write for yourself. 

Rom-zt includes a startup routine that 
can take an 8086 from restart to C program 
execution by setting up segment registers, 
stack, heap, copying initialized data from 
ROM to RAM, and zeroing uninitialized 
data. The BLAZE locator/Intel hex file 
generator.can locate code and data anywhere 
in memory, while performing checks for 
ROM overruns, illegal data access, and 
complete program location. The ROMable 
library contains the ROMable portions of the 
Optimum-C library, with support for inter- 
rupt handling in C, reading and writing I/O 
ports, and full math support. 


Debug ROMed Code from the PC 


You can download, execute, and debug 
programs on the target system from your PC, 
with Remote-DSD. This debugger is a sym- 
bolic windowing debugger that shows you the 
C source code (on the PC) that is executing 
on the target system. You can view and change 
global variables on the target system, modify 
data, set breakpoints and watch registers and 
flags. 


Try Optimum-C risk free 


Call us TOLL FREE today for your copy of 
Optimum-C. You Will also receive free* “C: 
A Programming Workshop” to get you 
started with C. To find out how we can help 
you get your ROM projects completed on 
time call us. 


Optimum-C w/ C Tutorial $139 
Rom-it $159 
Add $7 for shipping in US/$20 outside US 
COD (add $2.50) 
Not Copy Protected 


ORDER TOLL-FREE TODAY! 
1-800-221-6630 


ATTENTION OEMs! 


Contact us regarding arrangements. 


*Limited offer available exclusively to readers who 
purchase directly from. Datalight. 
Microsoft and MS-DOS are registered trademarks 
of the Microsoft Corporation. Turbo C isa regis- 
tered trademark of Borland International. 
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Magazine Reviewers Shocked by 
DATALIGHT?’s Performance... 


“Reviewing this compiler was quite a surprise 
for us. For such a low price, we were expecting 
a “lightweight” compiler. What we got was 
a package that is as good as or better than 
most of the “‘heavyweights.”’ Datalight C 
implements a complete C language. It also 
compiles quickly, doesn’t take up much disk 
space, and looks impressive in the bench- 
marks.” 


DR. DOBBS, August 1986 


“This is a sharp compiler!... what is impres- 
sive is that Datalight not only stole the com- 
pile time show completely, but had the fastest 
Fibonacci executable time and had excellent 
object file sizes to boot!” 


COMPUTER LANGUAGE, February 1986 


Optimum-C Version 3.08 


NEW! 
EZ Interactive Development Environment 


NEW! 
Inline 8087/80287 Math Support 


¢ Full UNIX System 5 C language plus 
ANSI extensions 

¢ Fast/tight code via powerful 
optimizations including common sub- 
expression elimination 

¢ DLC one-step compile/link program 

¢ Multiple memory model support 

¢ UNIX compatible library with PC 
functions 

¢ Compatible with DOS linker and 
assembler 

¢ Third-party library support 

¢ Automatic generation of .COM files 

¢ Supports DOS pathnames, wild cards, 
and Input/Output redirection 

¢ Compatible with Lattice C version 3.x 

¢ Interrupt handling in C 

¢ Debugger support 

° 

¢ 

) 


ROMable code support/start-up source 

Full UNIX MAKE Program 

Tools in Source Code: cat, diff, ... 
MS-DOS? Support Features 


Mouse support 
Sound support 
Fast screen I/O 
Interrupt handler 


Datalight 


17505-68th Avenue NE, Suite 304 
Bothell, Washington 98011 USA 
(206) 367-1803 
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bargain. We have gone to great lengths 
to design and implement Windows for 
Data so that it can do the tough jobs 
without source modifications. Our cus- 
tomers tell us that we have succeeded. 
Of course, source code can be an im- 
portant learning aid. Recognizing this, 
we supply customers with numerous 
source code examples of the use of Win- 
dows for Data in practical applications, 
including source for 18 complete pro- 
grams. This source code supplies the de- 
sired teaching benefits without imposing 
the undesired maintenance costs. 
Vince Taylor 
President 
Vermont Creative Software 
Richford, Vt. 


Leary defended 


Dear Editor: 

As a computer programmer and ex 
plorer of as yet uncharted areas of con- 
sciousness, I would like to comment on 
Bob Nance’s criticism (Feedback, COM- 
PUTER LANGUAGE, Jun. 1987, p. 14) 
of Timothy Leary (“Timothy Leary and 
the Cyberpunks,” Computer Visions, 
COMPUTER LANGUAGE, Apr. 1987, 
pp. 111-116). Nance attempted to ridi- 
cule Leary’s statement that computer 
programmers have a “great responsibility 
and a wonderful challenge” of raising the 
intelligence level of the human race by 
10%. I believe that computer program- 
mers will, perhaps unintentionally, 
achieve results in this direction far be- 
yond Nance’s ability to imagine. 

Nance is in error in supposing our 
Creator has not delegated to us the re- 
sponsibility for raising our intelligence. 
Does Nance believe that our intellectual 
striving after new knowledge, by what- 
ever means available, has nothing to do 
with the level of insight we possess? Are 
we not meant to use our brains? 

It is certainly true that an increase in 
human intelligence will not come about 
merely as a result of the existence of 
computers. However, computers can be 
tools: for intellectual discovery just as, in 
past ages, sailing ships and new tech- 
niques of navigation were tools for the 
discovery of the New World. It is within 
the power of computer programmers to 
create the means by which human intelli- 
gence may be augmented as a result of 
our own persistent intellectual endeavors. 

Leary’s unrestrained proselytization 
for LSD certainly had unfortunate ef- 
fects, but at least he enthusiastically em- 
braced the potential for new knowledge 
made possible by psychedelics and now 
does the same for computer software. 
His affirmation of the possibilities of 


A Different BASIC Might 
Make All the Difference 


We’ll skip the four-color gatefold. And the extravagant claims. 
Because if you’re serious about programming, you just want the straight facts: 


True Microsoft Borland 
BASIC Quick Basic Turbo Basic 
2.01 3.0 2.0 


GRAPHICS 
‘Supports Hercules Graphics NO NO 
Device-Independent Graphics Syntax YES NO NO 
User-Defined Coordinates YES LIMITED ~ | LIMITED 
Matrix Graphics Coordinates é NO NO 
ARRAY HANDLING 
Matrix Algebra 
Maximum Numeric Array UNLIMITED 
Max. Number of Array Dimensions 255 
UNLIMITED 
YES NO NO 
YES 


Max. Number of Elements/Dimension 


Dynamic Redimensioning 
Matrix I/O Statements 
STRING/FILE HANDLING 
Maximum String Length 

Total String Space UNLIMITED 
16MB 


Maximum Record Size 
Max. Bytes/Binary File Read 
PRODUCTIVITY ENHANCERS 
Modules NO NO 
Separately Compiled Libraries YES LIMITED NO 
Workspaces YES NO NO 
NO 


Immediate Mode 
SPECIAL FEATURES 
Stop/Continue Execution YES NO NO 
Max. Source File UNLIMITED | UNLIMITED 64K 
Script Files YES NO NO 
Keystroke Macros YES NO NO 


Max. Tharacters/Line 64K 255 char. 249 char. 
Max. Scalar Data Space UNLIMITED 64K 64K 
Mouse Support YES NO NO 
80386 Version YES NO NO 


Portability to: Macintosh, - Translation | No other 
Amiga, Atari required machines 


Three very structured, very powerful programming packages. All 
with fancy editors and fast compilers. Two of them are the same in 
other respects. And one of them, True BASIC, is quite a bit 
different. With syntax and features that will make you more productive. 


That’s why reviewers for magazines like BYTE, PC Tech Journal and 
Computerworld keep giving True BASIC their top 
marks. And why OEMs pick True BASIC after zl 
they’ve evaluated all the others. See why True 
BASIC can make the difference for you. 

Call 1-800-TRBASIC today. 


True BASIC, Quick Basic and Turbo Basic are trademarks of True BASIC, Inc, Microsoft 39 ae Be ee 
and Borland, respectively. Macintosh, Amiga and Atari are trademarks of Apple Computer, HANOVER .H. 037. 

Inc., Commodore-Amiga, Inc. and Atari Corporation. Copyright 1987 True BASIC. A a 

Specifications are accurate as of August 1987. (603) 643-3882 
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hen it comes to maintaining their most 

valuable asset, the leading software 
publishers rely on the POLYTRON Version Con- 
trol System (PVCS). From accounting firms to 
airlines, the leading service companies depend 
on PVCS to maintain the integrity of their pro- 
grams. Leading manufacturing companies use 
PVCS to maintain their state-of-the-art software. 
Leading high technology companies turn to 
PVCS to handle configuration management for 
software projects that represent an investment 
of hundreds of thousands of dollars. The largest 
aerospace companies and defense contractors 
use PVCS to maintain integrity of projects during 
development and after delivery of software. 
Independent programmers use PVCS to 
improve their productivity and software quality 
for themselves and their clients. 


Simplify 
Configuration Management 
When large and complex software programs are 
being developed on personal computers or VAX 
minicomputers, effective management of the 
revisions and versions becomes critical. PVCS 
simplifies this process and lets you effectively 
control the proliferation of code changes. We 
used UNIX SCCS and RCS as models. How- 
ever, our own experience, and the input of 
hundreds of programmers and managers has 
enabled us to significantly improve upon these 

models. 


PVCS provides many 
powerful functions including: 
e Storage & Retrieval of multiple revisions of text. 
¢ Maintenance of acomplete history of changes. 
e Maintenance of separate lines of development 
using branching. 
° Merging simultaneous changes. 
e Resolution of Access Conflicts. 


e Modules can be retrieved by their own revision 
number, system version name, or specified 
date. 


e Uses “reverse deltas” to rebuild a prior version 
making PVCS the fastest version control 
system over the project life cycle. 


e Projects already under development or in the 
maintenance stage can be easily put under the 
control of PVCS. 


Manages Development On 
Local Area Networks 


Programming teams using Local Area Networks 
depend on PVCS to help the managers and 
team members work together. In fact, Novell and 
3Com themselves depend on PVCS to manage 
the versions of their own network software 
products. 


Supports MS-DOS 
and VAX/VMS Development 


Now, companies that develop software on VAX 
systems running VMS can also use PVCS. And 
since the VMS and MS-DOS versions of PVCS 
use the same “logfile” format, you can easily 
develop software on PCs and maintain the code 
on the VAX or vice versa. The menu-driven, 
screen-oriented interface (and optional 
command-driven interface) makes it easy for 
programmers and librarians or administrators to 
use PVCS on a PC or VAX or both systems. 


PVCS Maintains System 
Integrity 


PVCS prevents corruption of code that could 
ordinarily result from security breaks, user care- 
lessness or malfunctions. The levels of security 
can be tailored to meet the needs of your project. 


PVCS & PolyMake 
Work Together 


PolyMake, the leading MS-DOS make utility, is 
now available for the VMS operating system. 
This allows you to write makefiles that will func- 
tion in both PC and VAX environments. Addition- 
ally, PolyMake reads time & date stamps of PVCS 
archives for fast, accurate program rebuilding. 


PVCS and PolyMake Maintain 
Source Code Written In 
Any Language. 


Only PVCS meets the needs of independent 
programmers and corporations. Once you stan- 
dardize on PVCS, the archives used to track and 
monitor changes are interchangeable between 
any PVCS product. You will receive full credit for 
your initial purchase if you upgrade to a higher- 
priced MS-DOS version of PVCS. 


Personal PVCS — Offers most of the power and 
flexibility of Corporate PVCS, but excludes the 
features necessary for multiple-programmer 
projects. 


Corporate PVCS — Offers additional features to 
maintain source code of very large and complex 


projects that may involve multiple programmers. 
Includes multi-level branching to effectively main- 
tain code when programs evolve on multiple 
paths (e.g. new versions for different host 
systems, or anew program based on an existing 
program). 


Network PVCS — Extends Corporate PVCS for 
use on Networks. File locking and security levels 
can be tailored for each project. 


PVCS for VAX systems — Requires VMS. Uses 
the same interface and archive format as MS- 
DOS version. Supports branching and offers file 
locking and other security features for multiple- 
programmer projects. 
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High Quality Software Since 1982 
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The Preferred 
Version Control System 


The customers listed below are just a few of the 
innovative leaders that have made PVCS the 
leading version control program for personal 


computers. 


Alcoa Aluminum ISC Aerospace 
Arthur Anderson IVAC 

AT&T Javelin 

Ashton-Tate Lattice 

Bank of America Lawrence Livermore 
Bell Labs Lotus 

Bendix McData Corp. 
Boeing McDonnell Douglas 
CIGNA Mead Data Central 
Citibank MIT Lincoln Labs 
3Com Nastec 

Colonial Penn Novell 

Commerce Clearing House NCR Technologies 


Control Data Corp. 


Pitney Bowes 


Corvus Plexus Computers 
CXI Price Waterhouse 
Digital Equipment Corp. ROLM 

Deloitte Haskins + Sells Rockwell International 
Diebold Safeco 

Dow Sears 

Dunn & Bradstreet Security Pacific 

EDS Sperry 

Educational Testing Service Software Publishing 
E-Systems Spacelabs 

Equitable Life Standard Oil 

Federal Express Standard & Poors 
First Boston Tandem 

Ford Tektronix 

Fox Software Telex 

Fujitsu Texas instruments 
GTE Touche Ross 

Hardees Unisys 
Hewlett-Packard United Airlines 
Honeywell United Parcel Service 
Hughes Aircraft United Technologies ee 
IBM U.S. West : 


Industrial Networking 
Intel 


Westinghouse Electronics 
Xerox 


MS-DOS" 


PC/XTIAT 


Micro VAX II 


PersonalPVCS | $149 


VAX 8xxx 
laa TT 
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Corporate PVCS | $395 


Network PVCS $995** 


PolyMake $149 


| 


$10,500+ 


Network 


$447** 
PolyMake 


= 


$1,250 


$2,500+ 


*Compatible with MS-DOS 2.0 through 3.3. 
Compatible with the IBM PC/XTIAT & other 


MS-DOS PCs. 


**5 Station LAN License. Call for pricing 


on larger Networks. 


TO ORDER: 
VISA/MC 1-800-547-4000. 
Dept. No. 350. 

Oregon & Outside USA call (503) 645-1150. 
Send Checks, PO.s to: POLYTRON 
Corporation, 1815 NW 169th Place, 

Suite 2110, Beaverton, OR 97006. 


raising human intelligence by our own 
efforts is far more admirable than 
Nance’s attempt to have us abdicate re- 
sponsibility for our intellectual evolution. 
Choosing instead to leave this evolution 
in the hands of a mythic personage is, it 
seems to me, unlikely to produce any re- 
sult beyond stagnation. 
Peter Meyer 
Captain Cook, Hawaii 


Taking the heat 


Dear Editor: 

I would like to comment on the letter 
from Paul Barkley, President of Barbi- 
can (Feedback, “Probable Complexity”, 
COMPUTER LANGUAGE, May 1987, 
pp. 11-12). If we were all capable of per- 
ceiving project solutions as trivial, we 
would all be president of Barbican. I sup- 
pose Mr. Barkley should be glad we ordi- 
nary folks have a healthy appreciation 
for what he considers to be his own “triv- 
ial” analytical skills. Otherwise, he might 
be receiving substantially less money for 
his “commonplace” talents. 

A good programmer is simply a person 
who wants to program, who lives to solve 
dynamic problems and derives satisfac- 
tion from it. A bad programmer is a per- 
son who does not have that burning 
desire. Maybe they only got into it be- 
cause they heard it pays well, or it’s the 
fashionable job to get. Perhaps they are 
sophomoric and unwilling to change 
some ironclad exception to their static 
rules. Or maybe they believed the bit 
about the programmer holding a coffee 
cup all day, while the computer does all 
the work. Programming is not easy and 
not always fun. It is rewarding only to 
those who can take the heat. There is a 
lot of heat in our chosen kitchen. It just 
happens that some of us like it hot. 

I would like to add that I have a 
healthy appreciation for the difficulty of 
producing a magazine such as yours. It is 
hard to find a computer magazine today 
which manages to be instructive, infor- 
mative and entertaining. Your writers 
are the rare combination of good pro- 
grammer and good writer. They do not 
try to impress us with obscure jargon and 
acronyms, or engage in irrelevant de- 
bates. The tone of the articles is informa- 
tive without being condescending or 
bewildering. The reviews have personal- 
ity, humor and flair without ego-display 
and cheap shots, and yet they adhere to 
technical accuracy. You deal gracefully 
with errors. Should a controversy occur 
you present both sides in an intelligent 
way, sans “yellow journalism.” 

You have reached a level of balance in 
the field of technical writing that is ex- 
tremely hard to find. I have been ex- 
posed to loads of what has to be the 
driest stuff to read in the world. It is re- 


freshing after a day of that to pick up 
your magazine. It manages to be both an 
escape from my job and a revitalizer that 
furthers my education and motivation to 
do it well. You guys deserve a lot of 
praise. 
Eileen Tronolone, AlC USAF 
Ramstein, Federal Republic of Germany 


Mistaken identity 


Dear Editor: 
I’ve been getting a rash of letters ask- 
ing if I posed for your July cover. I just 


Add C++ to 
your favorite 
C Compiler 


e Object-oriented C 


e Strong type-checking 


e Works with your 
present C Compiler 


don’t understand it. As you well know, I 
don’t look a bit like that ridiculous pup- 
pet. If you could run this letter as a dis- 
claimer, I’d be eternally grateful, and I’ll 
stop telling people that you were our July 
cover model. Thanks. 
Michael Swaine 
Editor-in-chief and associate publisher 
Dr. Dobb’s Journal of Software Tools 
Redwood City, Calif. 


It’s a deal, Mike!—Ed. 
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DESIGNER C++ 


BENEFITS: 
> You can incrementally add C++ 


> Makes C more suitable for 
— very large programs 


> Works with Sun’s dbxtool 


now use 
> More reusable code 


features to C (switch-selectable) 


— more sophisticated applications 


> Works with the C Compiler you 


> Resilient and bug-free code 


FEATURES: 

e Fully compatible with 
AT&T C++ standard 

° Optional strong type 
checking 

e Data abstraction 

e Overloading of func- 
tion names and 
operators 

e Dynamic typing (virtual 
functions) 

e User-defined implicit 
type conversion 


The only commercially-available C++ customized 


to operate on PC's, micros, minis, and main- 
frames with popular C compilers, including: 


GREEN HILLS 


VAX C 
ULTRIX C 
SUNC 
MICROSOFT’ 
LATTICE’ 


APOLLO 
XENIX 
HP-9000 
UNISOFT 


We Specialize in: Cross/Native Com- 
pilers: C, Pascal, FORTRAN, Ada, LISP — 
Assemblers/Linkers — Symbolic Debug- 
gers — Simulators — Interpreters — Pro- 
filers — QA Tools — Design Tools —Comm. 
Tools —OS Kernels — Editors — VAX & PC 
Attached Processors and more 

We Support: 680xx, 80x86, 320xx, 68xx, 
80xx; Clipper, and dozens more 


*Lattice and Microsoft versions of Designer C++ are known as 


Advantage C ++ . 


eee ae ee SE 
60 Aberdeen Ave., Cambridge, MA 02138 (617) 491-4180 ===" 
1219 Morningside Drive, Manhattan Beach, CA 90266 (213) 546-5814 (CA only) 


Designer C++ is a joint trademark of XEL, Inc. and Glockenspiel, Ltd of Dublin, Ada is a trademark of the U.S. Government (AJPO), Advan- 
tage C++ isa trademark of Lifeboat Associates. Inc. Other trademarks are acknowledged to DEC, Lattice, Microsoft & Sun Microsystems, Inc. 
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~ Ourthanks to NASA for supplying this connie enhanced ultraviolet photo taken by Skylab IV cf a solar prominence reaching out 350, 000 miles above the sun’s surface 


~ Genius Begins With A Great Idea... 


Sut If h e ( 
~ What follows is the time consuming raat, of giving 
form and function to the idea. 

That’s why we concentrate on building into our soft- 
ware development systems functions and features 
that help you develop your software ideas in less time 
and with less effort. 

We've started 1987 by releasing new versions of 
our MS-DOS, Macintosh, Amiga, ROM, and Apple // 
C development systems. Each system is packed with 
new features, impressive performance, and alittle bit 
more genius. 


Superior performance, a powerful new array of fea- 
tures and utilities, and pricing that is unmatched 
make the new Aztec C86 the first choice of serious 
software developers. 


Aztec C86-p Professional System .. . .$199 
© optimized C with near, far, huge, small, and large 
memory + Inline assembler + Inline 8087/80287 + 
ANSI support + Fast Float (32 bit) + optimization 
options Manx Aztec 8086/80x86 macro assembler 
Aztec overlay linker (large/small model) ¢ source 
level debugger ¢ object librarian ° 3.x file sharing & 
locking * comprehensive libraries of UNIX, DOS, 
Screen, Graphics, and special run time routines. 


Aztec C86-d Developer System...... $299 
'@ includes all of Aztec C86-p © Unix utilities make, 
diff, grep ° vi editor © 6+ memory models ¢ Profiler. 


Aztec C86-c Commercial System... . $499 
¢ includes all of Aztec C86-d ¢ Source for library rou- 
tines © ROM Support ¢ CP/M-86 support e One year 
of updates. 
Aztec C86 Third Party Software 

A large array of support software is available for 
Aztec-C86. Call or write for information. The follow- 
ing is a list of the most requested products: @ Es- 
sential Graphics e C Utility Library © Curses e 
Greenleaf Communication, General, and Data Win- 
dow @ Halo e Panel+ @ PC-lint e PforCe @ Pre-C 
Windows for C e Windows for Data e C terp e 
db_Vista e db-Query e Phact e Plink-86 Plus e c- 
tree e r-tree e Pmate 


C compiler 8080/Z80 ascemiblen tinker librarian; 
UNIX libraries, and specialized utilities. 


Aztec C ll-c (CP/M-80 & ROM)........ $349 
Aztec Cll-d (CP/M-80)..........008 $199 
Aztec C80 (TRS-80 3&4)............ $199 


# cludes: all of Aztec C68k/Am-p @ 


Amiga user groups across the USA voted Aztec 
C68k/Am release 3.3 the best Software Development 
System for the Amiga. Release 3.4 is more impres- 
sive. 


Aztec C68k/Am-p Professional ...... $199 
A price/feature/performance miracle. System in- 
cludes: optimized C e 68000/680x0 assembler ° 
68881 support ° overlay linker e UNIX and Amiga 
libraries © examples. 


Aztec C68k/Am-d Developer ........ $299 
The best of Manx, Amiga, and UNIX. System in- 
the Unix utilities 
make, diff, grep and vi. 


Aztec C68k/Am-c Commercial....... $499 
Aztec C68k/Am-d plus source for the libraries and 
one year of updates. 


For code quality, reliability, and solid professional 
features, Aztec C for the Macintosh is unbeatable. 
This new release includes features and functions not 
found in any other Macintosh C development system. 


Aztec C68k/Mac-p Professional...... $199 
© MPW source level compatibility ¢ TMON, 
MACSBUG, AND MACNOSY support ¢ pow- 
erful symbolic debugger e optimized C e 
68000/680X0 assembler e 68881, EEE, and 
SANE support e overlay linker e UNIX and 
Macintosh libraries e.mouse editor e examples 
Aztec C68k/Mac-d Developer........ $299 
The best of Manx, Macintosh, and UNIX. System in- 
cludes: all of Aztec C68k/Am-p @ the Unix utilities 
make, diff, grep vi editor. 


Aztec C68k/Mac-c Commercial ...... $499 
Aztec C68k/Am-d plus source for the libraries and 
one year of updates. 


Aztec C65 i is the Seni sornineraal al quality ¢ C com- 
piler for the Apple Il. Aztec C65 includes C compiler, 
6502/65C02 assembler, linker, library utility, UNIX li- 
braries, special purpose libraries, shell development 
environment, and more. An impressive system. 


Aztec C65-c Commercial ........... $299 
e runs under ProDOS ° code for ProDOS or DOS 3.3 
Aztec C65-d Developer...........55 $199 


¢ runs under DOS 3.3 ¢ code for DOS 3.3 


Manx Software Systems 
1 Industrial Way, Eatontown, NJ 07724 


yw © 


waact TM PHACT Assoc., PRE-C. 


OU OU JOVAY 

An IBM or Macintosh is not only a less expensive 
way to develop ROM code, it’s better. Targets include 
the 6502/65C02, 8080/Z80, 8086/80x86, and 680x0. 

Aztec C has an excellent reputation for producing 
compact high performance code. Our systems for 
under $1,000 outperform systems priced at over 
$10,000. 


Initial Host Plus Target............. $750 
Additional Targets ...........0..045 $500 
ROM Support Package............. $500 


Sun, PDP-11 ; 
Call a information on Vax, PDP-1 41, sun and aor 
host environments. 


Lad - a . rai Li ri 
These C development systems are unbeatable for 
the price. They are earlier versions of Aztec C that 
originally sold for as much as $500. Each system 
includes C compiler, assembler, linker, librarian, 
UNIX routines, and more. Special discounts are 
available for use as course material. 


C’ Prime 


Most Aztec C evan are available as cross devel- 
opment systems. Hosts include: PC/MS-DOS, Mac- 
intosh, CP/M, Vax, PDP-11, Sun, and others. Call for 
information and pricing. 


To become auser call 800-221- -0440. From Nu or 
international locations call 201-542-2121. Telex: 
4995812 or FAX: 201-542-8386. C.0.D., VISA, 
MasterCard, American Express, wire (domestic 
and international), and terms are available. One 
and two day delivery available for all domestic and 
most international destinations. 

Aztec C is available directly from Manx and from 
technically oriented computer and software stores. 
Aztec Systems bought directly from Manx have a 30 
day satisfaction guarantee. 

Most systems are upgradable by paying the differ- 
ence in price plus $10. Site licenses, OEM, educa- 
tional, and multiple copy discounts are available. 


To order or for more information call today. 
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In NJ orinternationdl call (201) )542- 2121 e TELEX: 4995812 


is a registered TM of Microsoft, Inc., CP/M TM DRI, HALO TM Media Svea etices PANEL TM hound comeuter Systems, Ltd., 
Plink-86, Plink-86 + , P-Force TM Phoenix, db Vista T! C-ter 

ware, C-tree TM Faircom, Inc., Windows for C, Windows for DATA TM Creative Solutions, Apple li, Macintosh FM Apple, Inc., TRS-80 TI 
Radio Shack, Amiga TM Commodore Int’l., Unix TM AT&T, Vax TM DEC, Aztec TM Manx Software Systems. 


M Raima Corp, Cterp, PC-lint, TM Gimpel Sot 
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m= >> PROGRAMMING 


et’s talk about 
rasa > [sss Some of 

you may find this 
topic boring. If so, then I suspect you are 
probably masking discomfort with 
boredom. 

Some of you may be more open about 
your discomfort. If so, then it’s about 
time you took a close look at your own 
ethical position. Some of you may simply 
wonder what ethics has to do with com- 
puter programming. If so, then you’re 
very much at risk. In this arena, igno- 
rance is not bliss. 

In the early ’60s, I was pleased to dis- 
cover that I could work my way through 
college as a computer programmer. To 
me, this was much less of an effort than 
delivering pizzas or shelving library 
books. 

Upon earning a Ph.D., I was bemused 
to discover that I could command twice 
as much salary being a purported com- 
puter scientist as I could with full blown 
credentials in nuclear physics. 

As a budding entrepreneur, I was as- 
tonished to discover that I could parlay a 
nest egg measured in tens of thousands 
of dollars into a business with an annual 
turnover in the millions, all within a few 
short’ years. If I had chosen to open a 
restaurant or dry cleaning shop in Man- 
hattan, it would have been next to impos- 
sible to do so on the same amount of 
money. And there isn’t a banker alive 
who would have loaned me the stake nec- 
essary to get off to a proper start. I had 
no experience in running a business, 
much less in starting one. I didn’t even 
have any courses on business or account- 
ing in school. It turned out, however, that 
there were any number of people pre- 
pared to educate me, in trade for varying 
sized chunks of the cash I found myself 
administering. 

You'd be surprised how dishonest some 
people can be for a mere $100,000. Well, 
maybe you wouldn’t, but I certainly was. 
And you might be surprised at how nu- 
merous and varied are the temptations 
put your way in the course of everyday 
business. Even if your programming ca- 
reer has been confined to working sala- 
ried jobs, I’m sure you’ve faced situations 


» ON PURPOSE 


Honestly, now 


By P.J. Plauger 


where just a little dishonesty could earn 
(or save) you a significant sum of money. 
As the old joke goes, we’ve established 
what you are, now we’re arguing about 
the price. 

Writing computer software is a high- 
paying business. Technically trained peo- 
ple tend to be naive about business 
matters. It is not uncommon these days 
for techies to end up tending a cash en- 
gine much larger than the real world 
would ordinarily entrust them with. 
There are people who prefer to divert an 
existing flow of money their way, by 
whatever means, rather than directly 
generating wealth themselves. This is an 
explosive situation. 

Writing computer software is all the 
more perilous because it is so-easy to 
steal the final product. Software is an in- 
tellectual creation only loosely tied to 
concrete representation—much like re- 
corded music or lithographs. It is even 
easier to steal than those art forms be- 
cause it doesn’t degrade when copied. 
And its per copy value is substantially 
higher than its per copy cost. (The mak- 
ers of digital sound recordings are just 
coming to grips with these problems. 
Witness the maneuverings surrounding 
the introduction of digital tape 
recorders.) 

On top of everything else, producing 
software is a new-industry. We are all 
learning, a day at a time, what works 
and what doesn’t. How do you balance li- 
censing protection against the need to ex- 
pedite a sale? The last decade has seen a 
different answer to this question every 
year. How much should you charge for 
the use of a computer program? Beats 
me—the only formula I’ve seen that I 
believe in involves the relative humidity 
and the Dow Jones Industrial Average. 
When does a program infringe on some- 
one else’s design, and when can you build 
on technology that has gone before? 
That’s a hot topic of debate today, par- 
ticularly with Lotus suing and being sued 
for copying the look and feel of success- 
ful software. 

The software industry is too important 
to wait for scholars and judges to puzzle 
out a coherent set of laws. We need prag- 
matic answers now, even if they form a 
patchwork of guidelines that sometimes 
conflict. Needless to say, there are those 


who cheerfully exploit the current incon- 
sistencies as an excuse to be morally lax 
in a profitable field. 

Ethics touches computer programming 
in many different places. This column is 
a not-quite-random walk past some of 
those places where I have found myself 
face to face with ethical lapses. I begin 
with lapses that are most peculiar to 
larger companies. It is easier to distance 
ourselves from those nameless people 
who try to screw us in the name of Unit- 
ed Whatever, even though the actual de- 
cisions are made by people just like you 
and me. I end painfully close to home, 
discussing the sins that you and I strug- 
gle with every day. Are you ready? 


ne of my first 
imma >) shocks as a 
fledgling busi- 


nessperson came just a few months into 
the mission. My company offered a com- 
piler that attracted the eye of several te- 
chies working in different branches of a 
major computer hardware manufacturer. 
(The company shall remain nameless— 
I'll refer to it as the MCHM.) Plagued 
with a fear of outside software, that com- 
pany throttled all such purchases, even 
when the per copy price was a mere 
$550. 

Eventually, however, the central pur- 
chasing department of the MCHM felt 
moved to act upon the repeated requests 
for our product and sent us a purchase 
agreement. It was not the agreement we 
sent to each of the techies. It did not 
contain our standard software license. It 
made no attempt to replace the license 
with any similar protections. 

Instead, their agreement offered to 
purchase a single compiler from us at the 
full price of $550—with the understand- 
ing that they could purchase two addi- 
tional compilers from us, each at half 
price. Further, once we had been paid the 
princely sum of $1,100, the MCHM 
would have unlimited internal use of our 
compiler. 

I sent back a letter stating that I 
would be happy to sell our software on 
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the terms they outlined—with the under- 
standing that they would sell us their 
most popular superminicomputers on ex- 
actly the same terms. I sent a copy of the 
letter to the president of the MCHM. I 
got back a letter from the public rela- 
tions department politely explaining that 
these were the terms initially offered to 
all software vendors who wanted to sell 
to the MCHM. We had to understand 
that some vendors accepted those terms. 

- I then drafted a letter pointing out 
that long ago merchant shipping did not 
truly flourish in the Caribbean until 
rampant piracy was suppressed. It is true 
that some merchants permitted pirates to 
board their ships and make off with their 
gold, valuable cargo, and assorted female 
passengers. That did not mean that the 
merchants necessarily approved of this 
practice, and it certainly did not make 
the practice right. I reread this letter 
with relish three times, then threw it 
away. 

Several years later, we had occasion to 
explore a joint marketing agreement with 
this MCHM. One of the first things I 
had to deal with was the file that the 
MCHM had accumulated on dealings 
with our tiny company. A prominent en- 
try in the file was the letter I sent to 
their president back in the previous dec- 
ade. Even though the MCHM represen- 
tative with whom I was dealing was in 
full sympathy with our earlier stance, he 
still had the task of justifying why the 
MCHM should do business with us. We 
were, after all, known troublemakers. 

This is a clear application of the well- 
known principle “might makes right.” 
Being part of a large enterprise can be a 
heady experience, and it is easy for em- 
ployees to become enamored of wielding 
that sort of clout. There are, of course, 
companies in the business of going out of 
business, like some famous shops on 
Times Square, but the good ones treat 
each deal they strike as if it were the 
first of many with that party. 

You face an ethical dilemma when a 
large company offers you piratical terms 
and you really need the business. Your 
duty, to yourself and to the ownership of 
your enterprise, is to say no. Don’t be a 
victim, don’t blame it all on the big guys. 
It does you no good to strike a deal that 
is not profitable. As the old saying goes, 
you can’t lose money on every sale and 
make it up in volume. So the principle to 
keep in mind is: 


JUST BECAUSE THEY CAN GET AWAY 
WITH IT DOESN’T MAKE IT RIGHT. 


In this case, my company was fortu- 
nate at that time not to need a potential 
$1,100 bad enough to sell our birthright 
for a mess of pottage. (Eventually, the 
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You have an ethical 
responsibility to 
produce the best 
product you can 


MCHM came back and bought compil- 
ers on our standard terms anyway.) Still, 
it was a sobering experience. 


t’s nice to know 
ae >> | that there are laws 

to protect your 
person and your property. Gone are the 
days when pirates roamed the high seas 
with impunity and robber barons distort- 
ed markets to their personal advantage. 

If you believe that, then eat your cook- 
ies, drink your milk, and go to bed. I 
read in The Wall Street Journal every 
week about modern-day robber barons 
who still stay one step ahead of the Secu- 
rities Exchange Commission. I read in 
The Boston Globe almost as frequently 
about modern-day pirates who prey on 
merchant ships despite the protection of- 
fered by dozens of well equipped navies. 
And we all see daily how ineffective the 
courts are as civil referees. 

You’d think that if people owe you 
money, they have to pay it. Try collecting 
from someone who either hasn’t got the 
money or is willing to fight you for it. It 
can cost you so much time, additional 
money, and aggravation that the game is 
simply not worth the candle. 

Prudent people have learned the wis- 
dom of safeguards. You run credit 
checks, you insist on down payments, you 
ship the software COD. Even then, you 
still must set aside some fraction of rev- 
enues as a provision for bad debt. Some 
folks are just masters at stiffing us more 
honest folk. 

It’s bad enough-to have to sue some- 
one and know the suit is not cost effec- 
tive. It’s far worse to be sued and know 
that you can’t afford to defend yourself. 
Yes, the courts are supposed to throw out 
nuisance suits early on, but most judges 
bend over backwards to entertain any 
suit that has the least whisper of merit. 
(Would you want it any other way, if you 
were the wronged party?) 

Again, the software business is at a 
disadvantage because the product is both 
complex and intangible. You’ve read 
those horrible disclaimers that come with 
the software you buy. Would you buy a 
car on similar terms? Probably not. 

When my company first started, I an- 
guished for weeks over how to write a 
software license which promised some- 
thing other than delivery media that was 
more or less free of defects. But what 
can you promise, in simple terms, about 
a product as complex as a compiler or 


operating system? You can say that its 
quality is high and that you will fix bugs 
as quickly as you can, but you can’t 
quantify either of those statements. 

In the end, prudence and a litigious 
society led me to adopt the same arro- 
gant boilerplate that everyone else uses. 
But even this approach won’t keep you 
from being sued. There are all sorts of 
laws about implied warranties of mer- 
chantability and fitness of a product for 
its advertised purpose. If a customer de- 
cides, even after months of using it, that 
your product just ain’t good enough, 
there’s a fair chance you will be asked to 
refund the purchase price. (And how do 
you know, by the way, when a customer 
has destroyed all copies of your product 
and stopped using it?) 

My company was once sued by a cus- 
tomer who had been using one of our 
products for two years! And he admitted 
that he was still making good use of part 
of what he’d bought. Yet he sued for a 
complete refund, plus unspecified dam- 
ages, mostly because he no longer had 
any use for the rest. And we had to 
spend time and money preparing a de- 
fense. In the end, at the strong urging of 
the judge, we settled the matter by mak- 
ing a partial refund. It was far cheaper 
than proving that we were right in the 
courts. 

The simple fact is that the civil courts 
can be used as a blunt instrument by 
anybody who wants to give you a hard 


time. It’s a form of legal blackmail that ———~ 


is widely practiced. It can also be used, 
by someone who doesn’t want your mon- 
ey, to consume your precious time and 
psychic energy. 

But if you need to use the courts to re- 
dress your own grievances, you will find 
them to be an equally blunt instrument. 
You can bludgeon, but you can’t easily 
compel. So the principle to keep in 
mind is: 


JUST BECAUSE YOU'RE RIGHT DOESN'T 
MEAN THEY CAN'T GET AWAY WITH IT. 


Does this mean you’re hopelessly at 
risk when you sell software? Not at all. 

First, you have an ethical responsibil- 
ity to produce the best product you can. 
You are responsible for obeying the law. 
You are responsible for striking fair 
agreements and keeping your end of the 
bargain. If you simply do these things, 
you greatly reduce your need to sue and 
your risk of being sued. 

Beyond that, I have found two princi- 
pal ingredients in every lawsuit with 
which I have become entangled: ° 
g There was an ambiguous understand- 
ing, so both sides could argue that they 
were right before a court of law. 
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L_] Window Package $ 49 


Build true windowing into your 
Modula-2 code. 


(_] Upgrade Package 
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Add $6.50 for shipping and handling. California residents 
add applicable sales tax. Prices valid 
in U.S. only. Total Enclosed $ 
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the Book of the Mind Club. 
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PROGRAMMERS GUIDE 
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The ultimate reference 
guide to the entire 

family of IBM” : 
personal computers. 


The 

Microsoft 

guide for 

Assembly 
PRESS 


language 


and ¢ 


programmers, 


Microsott guide 


ed C programming. 


Want to turn programming time 
into prime time? Want to put some 
topspin on your techniques? Want 
to develop invaluable new resources? 

Time to hit the books. From 
Microsoft® Press. The best and 
brightest books in the business. 

Our parent company is Microsoft, 
the folks who taught the PC how to 
think. Our authors read ike a Who’s 
Who of What’s What. 

Here are four ways to boost your 
computer's I.Q.: 


Advanced MS-DOS" by Ray 
Duncan. Also known as an informa- 
tion bonanza for assembly language 
and C programmers. Disk files, 
records, directories, volume labels, 
internals, memory management, 
EXEC functions, installable device 
drivers. More. Ray Duncan has it 
down, Now you can, too. $22.95. 


The Peter Norton Programmer's 
Guide to the IBM" PC by Peter 
Norton. Want to develop inter- 
mediate and advanced programs 
you can port from one branch 
of the PC tree to another? Want 
to understand the hardware? Soft- 
ware? The differences between PC, 

: . XTAT and Jr? Get the latest tech 
talk? Relax. The leading authority in the field leads you 
out of the bog. $19.95. 448 pages. Softcover. 


Microsoft QuickBASIC by Douglas 
Hergert. Eere’s the perfect way to 


get uw 
Plus 
that’l 


skills: 


to speed with QuickBASIC. 
five, smart, sample programs 
week your QuickBASIC 
MORTGAGE. for data types: 


QUICKCHART, for graphics; 
SURVEY, for data-file techniques; 
EMPLOYEE, for random-access 
files; TWENTY-ONE, for IF... TIIEN... ELSE games. 
os. 95. 384 pages. Softcover. 


|: roficient C by Augie Hansen. 


Cross DOS and C and what do you 


: : PRM VOLENT 
: get? Powerful programs that run at 
€ | warp speed. Use the ANSLSYS 
device driver and the MAKE and 
te LIB utilities to learn valuable, 
ices | _ reuseable methods of structured 
program development. From the 
SEE man whose proficiency at Bell 
Labs, Geberal Dynamics and Raytheon was the spring- 
board to this expert guide for intermediates —and experts. 
$22.95. 512 pages. Softcover. 


Don't fumble for answers. Turn to 
Microsoft Press. Remember: What 
you get out of your PC depends on 
what you read into it. 


Available wherever books and software are sold. Credit card 
orders call 1-800-638-3030. In Maryland call collect, 824-7300. 


Microsoft and MS-DOS are registered trademarks of Microsoft 
Corporation. [BM is a registered trademark of International 
Business Machines Corporation. 
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@ Someone had a stake in being right at 
all costs, either because there was a lot 
of money involved or because his or her 
feelings got hurt. 

And when you come right down to it, 
the ambiguity and the money are mere 
excuses. I believe all lawsuits stem from 
hurt feelings. If you contrive in any way 
to say to someone, “Look, I don’t respect 
you and I don’t have to respect you,” 
then that person will find some way to 
respond, “Oh, yeah?” It’s as simple as 
that. 


o far, I’ve focused 
ncaa on other people 
who might do you 


wrong. Now let’s get more personal. 
When was the last time you copied some 
commercial software rather than pay for 
a legal copy? Maybe you just made an 
extra diskette for a friend to try out or to 
use on your PC at home. Maybe you 
bought one copy for the office and put 
the software on all the machines. We all 
know that software is overpriced and 
that they pad the price even more to cov- 
er this sort of thing. Right? Hogwash. 

If you write software for a living and 
you steal other people’s software, then 
you’re fouling your own nest. It costs 
money to make this stuff, and it costs 
more to keep it alive and evolving. Some 
of that money pays your salary or your 
rent. Some is invested in making better 
software for tomorrow. The shadowy fat 
cat raking in the dough is shadowy be- 
cause he doesn’t really exist. The money 
comes back to you, the guy at the next 
desk, and your Great Aunt Amelia who 
invests in high-tech stocks. Or it doesn’t 
come back at all. 

The cynics among you are already 
muttering that I’m probably not a saint 
in this area either. You’re right. I have 
played fast and loose with licensed soft- 
ware in the past. Then I wised up and 
went back and paid for it. I still am pret- 
ty casual about putting PC software on 
one machine before’l delete it from an- 
other. But if I find myself using multiple 
copies, I pay for them. It’s worth it for 
the extra manual set, not to mention the 
clear conscience. And I flatly refuse to 
let my company violate software licenses. 
Otherwise, how can we expect others to 
respect ours? 

Another delicate area: when you left 
your last job, what did you take with 
you? Listings of source code? Internal 
memos? Diskettes? Dump tapes? Many 
programmers feel that all the software 
they have ever written (or worked on) is 
their personal property. Their employers 
simply exploit it for their own nefarious 
purposes. Even if they sign a confiden- 
tiality agreement that clearly spells out 
who owns what, there are programmers 
who feel ill used when asked to leave be- 
hind their toys. 


A few years ago I reviewed a book 
about how to get started in your own 
software business. The author chose as a 
unifying theme three typical examples of 
software start ups. One was a guy who 
wrote a useful program for his employer, 
but his employer was not in a position to 
exploit it. So he quietly reworked it to 
run on a PC, then left his job to start 
selling the program. Another was a per- 
son who moonlighted for a year or so 
while building up cash flow in his new 
enterprise. A third was someone who 
bootstrapped his operation by luring 
away a customer or three from his pre- 
vious employer. 

This book was well written. And it did 
indeed show three typical ways to start a 
company. But, as I told the author, every 
one of those examples involved a clear 
violation of ethics, if not a clear violation 
of law. Even if you have a wash-and-wear 
conscience, you’d better not emulate any 
of these examples. As soon as you’re at 
all successful, your previous employer has 
a golden opportunity to sue you blind. 

I was pleased that the author heeded 
my advice and replaced his examples 
with three that were morally more defen- 
sible. He even added a brief essay on the 
need for ethics in business, for what that 
is worth. 

The principle that applies here is: 


JUST BECAUSE YOU CAN GET AWAY 
WITH IT DOESN'T MAKE IT RIGHT. 


he last topic P11 -~—~~ 
See » discuss is the 
touchiest of all: 


under what circumstances are you at li- 
berty, or even obliged, to defy the law? 
The victors in World War II made it 
very clear at Nuremberg, Federal Re- 
public of Germany, that we each have an 
obligation to be ethical, even if the cur- 
rent powers that be have perverted the 
law of the land. 

If you know that your company is in- 
tentionally selling defective software, 
then you have a moral obligation to stop 
it, even if it means violating the confi- 
dentiality requirements of your work 
agreement. It’s no fun being a whistle 
blower, and martyrdom is rewarding only 
to those who can take the very long view. 
But to do nothing is ethically untenable. 

You may feel that the society you live 
in is supporting some unethical behavior. 
Richard Stallman, of Project GNU 
fame, has stated loudly and repeatedly 
that he feels software should be “free.” I 
use quotes because his definition of free 
is a rather precise one that is easily mis- 
interpreted. Read his writings to seé just 
what he means. (An interview with Stall- 
man appeared in the March 1987 issue 
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of COMPUTER LANGUAGE, pp. 99- 
107. Also, a letter from him responding 
to comments on this interview appeared 
in the July 1987 issue of COMPUTER 
LANGUAGE, p. 9.) 

I disagree with Stallman. I think he de- 
lights in stirring up a roomful of respon- 
sible adults by calling them names. But I 
also respect the fact that he has a consis- 
tent belief, works hard to make it a reali- 
ty, and causes no bodily harm in working 
toward it. 

If you want to defy law and society for 
a living, then I strongly urge you to do 
your homework. Reread the Declaration 
of Independence. Read Henry David 
Thoreau’s essay “On Civil Disobedi- 
ence.” Read a book on the life of 
Gandhi. Above all, be so in touch with 
the rightness of your position that you 
are willing to endure ostracism and fi- 
nancial discomfort to prevail. 

If you feel, however, that it is OK to 
damage property or hurt people to get 
your reform, then you’re off base—that 
makes you an anarchist. Anarchists are 
unhappy people, boring at parties, and 
seldom effective in achieving their goals. 

Finally, what do you do when the bad 
guys have you cornered? (Remember, of 
course, that this is a relative term. To 
them, you are probably the bad guys.) 
More than one naive techie has signed 
away rights that later proved to be worth 
serious money. More than one naive en- 
trepreneur has found himself being driv- 
en out of his own enterprise by a barrage 
of legalese. No matter how legal the ma- 
chinery, you know that the inevitable end 
result just ain’t right. 

You can either be a victim or take re- 
sponsibility for obtaining an acceptable 
outcome. To do the latter, you have to be 
willing to exploit the clumsiness of law 
enforcement as much as the other guys 
(if not more). 

At one low point in my checkered ca- 
reer, I called a board meeting with just 
enough notice to satisfy the corporate by- 
laws but. not enough to inform everyone 
in time. (The meeting took place, aptly 
enough, right next door to Disneyland.) 
Needless to say, I got just the mix of at- 
tendees I needed to pass some very un- 
friendly resolutions. Were the resolutions 
valid? Well, sort of. I can say that they 
achieved the desired effect. 

In a different arena, I asked several 
loyal employees, relatives, and friends to 
pay an evening visit to a company office. 
They were accompanied by a locksmith 
and several moving vans. They nearly 
ended up in jail. Were they entitled to 
make that visit? Well, mostly. I can say 
that they achieved the desired effect. 

Another time, I was very slow to re- 
spond to a judge’s order. I was sufficient- 
ly slow that my attorney advised me not 
to set foot in the state of New Jersey un- 


til we had talked the matter through 
from a safer distance. (OK, New 
Yorkers, you can go ahead and say that 
that was no hardship.) Was I obeying the 
law? Well... 

You get the drift. The operative ethi- 
cal principle here is: 


JUST BECAUSE THEY'RE RIGHT DOESN'T 
MEAN YOU CAN'T GET AWAY WITH IT. 


It was not until I realized that the law 
is a two-edged sword, with both edges 
dull, that I began to take responsibility 
for cleaning up the mess I had put my- 
self in. And that’s what ethics is really 
all about: being responsible for the conse- 
quences of your actions. 


I have given you four ethical principles 
in this column. I’m convinced they’re 
correct and complete because they ap- 
pear to contradict each other. If you can 
figure out which one to apply each time 
you face an ethical dilemma, you can’t 


go wrong. | 


P.J. Plauger has coauthored several pop- 
ular textbooks with Brian Kernighan, in- 
cluding The Elements of Programming 
Style and Software Tools in Pascal. He is 
secretary of X3J11, the ANSI C stan- 
dard committee, and convenor of the 
ISO C standard committee. He is also 
the president of Whitesmiths Ltd. 


GUARANTEED. 


T hat's right. Saywhat, the lightning-fast screen 
generator, lets you build beautiful, elaborate, 
color-coded screens in minutes! We're talking 
about incredible screens for menus, data entry, 
data display, and help-panels that can all be dis- 
played with as little as one line of code in any 
language. Even batch files. 

With Saywhat, what you see is exactly 
what you get. And response time is snappy and 
crisp, the way you like it. That means screens 
pop up instantly, whenever and wherever you 
want them. 


THE PERFECT TOOL FOR PROGRAMMERS. 
Whether you're a novice programmer long- 
ing for simplicity, of Seasoned pro searching 
for higher productivity, you owe it to yourself to 
check out the all-new Version 3.6 of Saywhat. It 
offers full monochrome emulation and lets you 
build your own elegant, moving bar menus into 
any screen. (They work like magic in any 
application, with just one line of code!) You can 
also combine your screens into powerful screen 
libraries. And Saywhat'’s remarkable VIDPOP 
utility gives all languages running under PC/MS- 
DOS, a whole new set of screen handling com- 
mands — languages like dBASE, Pascal, BASIC, 
C, Modula-2, FORTRAN, and COBOL. (You can 
make VIDPOP resident and available at all times, 


If you aren’t completely delighted with 
Saywhat, return it within 30 days for a 
prompt, friendly refund. 


MONEY-BACK GUARANTEE 


or run it non-resident, transparently, with your 
favorite application). 


With Saywhat we also include a bunch of 


terrific utilities, sample screens, sample programs, 
and truly outstanding technical support, a// at 
no extra cost (Comprehensive manual included. 
Not copy protected. No licensing fee). 


ORDER NOW. YOU RISK NOTHING. 


Thousands of satisfied users already know 


that Saywhat can make screen design and pro- 
gramming a pleasure, not a chore. Why not call 
toll-free, right now and put Saywhat to the test 
yourself? The next time you sit down to create 
a screen, we guarantee 
you'll be glad you did. 
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$49.95 


(Plus $5 shipping and handling) 


ete td 
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Or spend $2000foran Intel’ — hespenttwo gloriousweeks on 
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Andwhen you installanInboard  cana$2000 system be more 


386, you get the rest oft. | ___ teliable than.a $6000 

Besides price, how /. one?The answer is yes. 
dotheycompare? ~ Because it’s built by the 
According toa recent same company that 
Infoworld product designed the 80386 
review, “Inboard has microprocessor and 
the best computing its backed by a five- 
speed ofall micro year warranty, 
systems we have tested Ifyou still need 
to date? including all more information 
other 386 systems. yy onwhich system 

The reason Inboardisso 4 ee is best, call us at 
fast is because of its zerowait ~~~ ~ (800) 538-3373. Or contact 
state cache and 32 bit memory. your local dealer. 

And there's alsoaspecialsocket  Thenwesuggestyou finda nice 
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Announcing - the database 
development system that 
you designed. i 


ee 


C PROGRAMMERS- 
We asked what you 
wanted in a database 
development system and 
we built it! 
db_VISTA III™ is the database development system for 
programmers who want powerful, high performance 


DBMS capabilities ... and in any environment. Based on 
the network database model and the B-tree indexing 


method, db_VISTA III gives you the most powerful and 
efficient system for data organization and access. From 

simple file management to complex database structures 
with millions of records. db_VISTA III runs on most 


computers and operating systems like MS-DOS, UNIX, 
VAX/VMS and OS/2. It’s written in C and the complete 
source code is available, so your application perfor- 


mance and portability are guaranteed! With db_VISTA 


III you can build applications for single-user microcom- 
puters to multi-user LANs, 


frames. 


up to minis and even main- 


The db_VISTA III" Database Development System 


db_VISTA™: The High Performance DBMS 


The major features include: 

Multi-user support for LANs and multi-user 

computers. 

Multiple database access. 

File and record locking. 

Automatic database recovery. 

Transaction processing and logging. 

Timestamping. 

Database consistency check utility. 

Fast access methods based on the network 

database model and B-tree indexing. Uses 

both direct ‘‘set”’ relations and B-tree in- 

dexing independently for design flexibility 

and performance. 

© An easy-to-use interactive database access 

utility. : 

File transfer utilities for importing/export- 

ing ASCII text and dBASE II/HI files. 

¢ A Database Definition Language patterned 

| cafter C, 

¢ Virtual memory disk caching for fast 
database access. 


@ 
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¢ A runtime library of over 100 functions. 

° Operating systems: MS-DOS, UNIX V, 
XENIX, VMS, OS/2. 

¢ C Compilers: Lattice, Microsoft, IBM, 
Aztec, Computer Innovations, Turbo C, 
XENIX, and UNIX. 

e LAN systems: LifeNet, NetWare, PC Net- 
work, 3Com, SCO XENIX-NET, other NET- 
BIOS compatible MS-DOS networks. 


db_QUERY:™ The SQL-based Query. 

© Provides relational view of db_VISTA 
applications. 

© Structured Query Language 

© C linkable. 

® Predefine query procedures or run ad-hoc 
queries “‘on the fly”. 


db_REVISE™: The Database 
Restructure Program. 
© Redesign your database easily. 


© Converts all existing data to revised design. 


ents feature royalty-free run-time distribution, source code 
d 


ur commitment to customer service. That’s why corporations 


RAIMA’S COMMITMENT TO YOU: No Royalties, Source 
Code Availability, 60 days FREE Technical Support and 
our 30-day Money-Back Guarantee. Extended services 
available include: Application Development, Product 
Development, Professional Consulting, Training Classes 
and Extended Application Development Support. 


HOW TO ORDER: Purchase only those components 
you need. Start out with Single-user for MS-DOS then 
add components, upgrade ... or purchase Multi-user ~~~ 
with Source for the entire db_VISTA III System. 
It’s easy... call toll-free today! 


RELATIONAL DBMS 
INDEX 


TABLE 1 TABLE 2 


NETWORK MODEL DBMS... db_ VISTA™ 
db_VISTA out-performs 


RECORD 1 RECORD 2 Linon ae 
ae relationa' 's with direct 
Overhead = = access to data and less data 
showninred [ B_ | al redundancy. Your applications - 
and pink. run faster and more efficiently! 


db__VISTA III™ Database 
Development System 


db_VISTA Ill” $595 - 3960 
db_QUERY™ $595 - 3960 
db_REVISE ” $595 - 3960 


db_ VISTA” File Manager 


We'll answer your questions, help 
determine your needs and get you started. 


CALL TODAY! 


1-800-db-RAIMA 


(that’s 1-800-327-2462) ‘ 


RAIMA 


CORPORATION 


3055 112th Avenue N.E., Bellevue, WA 98004 (206)828-4636 
Telex: 6503018237MCIUW FAX: (206)828-3131 


Starts at $195 
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ESIGNING WITH DATA BASES 


Putting the relational model 


in perspective 
Be ee eee ee 


By Matthew Rapaport 


: n the last col- 
on [ix (“Fidelity and Rating products by Codd’s rules 

ae the full relational 

model,” COMPUTER LANGUAGE Rules 


. 


July 1987, pp. 93-97) I discussed the 12 & ra 
rules of compliance for relational data 3 ee s 3 
bases advanced by E.F. Codd in two is- = 2 2] ge 2 e 
sues of Computerworld (Oct. 14 and aS a/ 2 =] 8 2/ 
Oct. 21, 1985). Since many of the terms Cj ea sisz/#/2/3 
4 : ; : (SS 0 pate es of 8] /)/2] 4 
discussed in this column were defined 6/#/3/3/2 zB] os a 3 be ae 
last month, I suggest using the last col- Elelzlalaélsl=l Fi slelaie 
umn as a reference while reading this : 
Eee peau 11/213)4)576|/718)9 mol wy & 
Table 1 reworks the rule and product vac oo Se ee 
matrix that appeared In my July column. Informix 9 2 5) 0 2 2 2 ] 1 0 D 0 14 Ae 
Besides the main rules, 30 secondary fea- NOMAD 2 Do 29 Sas 2) a0 ee ee eee 
tures were listed, and their relation to the UNIFY DPD 0 0 ee 0 
12 rules was illustrated in a table. DataFlex Dix Drs sen ea): tapes ee ese) en) pee eee) BO 
In studying the rules a bit, one cannot BASES PIs 225 x es 0 st) 
help but notice that they fall somewhat felnie : : 5 : a : : é 4 : . - 
H 1 :Dase Sh 
naturally into the three groups illustrated ve oe oO 01 Oe pr - 


in Table 2: structural, language, and 
A “0” indicates no support for the corresponding rule. A “1” indicates partial support in one 


independence. 
To help clarify the relationship be- form or another, while a ”2” signifies relatively full support for the rule. 
Factor = 4.17. 


tween the rules, features, and real-world 
significance, I’m going to suggest that 
the 18 manipulation features be con- 
densed into three language support fea- 
tures: basic operations, NULL support 
operations, and development support Rule groups 
operations (Table 3). 


Table 1. 


Many products now on the market can Rules Featares Groups 
fail to support as many as six of the ma- “S 
nipulation features and still be consid- 1 Si; S2 
ered fully supportive of the language 5) 56 
rules (relatively and in spirit, at least). 
For purposes of relative comparison, this 4 Structural 
is true as long as a product has some 10 58, S9, Il, 12, I3 


(Sey 
7 


support in each of the three language 
support categories. 


From this point on, the term “fea- : { 
tures” will refer to the set of 15 balanced S S7, M11, M12, M13, M14 
5 
7 


features composed of the three language Earoucne 
support, nine structural, and three integ- 
rity features. MI-M10, M1S-M18 
The structural group (Table 2) is intu- 12 
itively the most important in distinguish- : : 


ing relational data base management 
systems from other models. Four or five 
main rules are associated with this cate- 9 
gory, along with eight or nine of the 15 : Independence 
features. This disproportionate emphasis W 

is justified in that the table idea, and the 

extension to tables of tables (data dictio- Table 2. 
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naries), is the centerpiece of the relation- 
al model. 

Table 4 summarizes the fidelity of the 
example products with respect to the 
three groups in Table 2. Notice first that 
the minimum scores show 50% fidelity in 
this group because all of these products 
store data in tables (rule 1). They also 
guarantee access to at most one tuple 
through specification of a unique prima- 
ry key. 

None of the products with minimal 
scores in the structural group requires a 
developer to create an attribute (combi- 
nation) that will always be unique. In ev- 


Manipulation rules 
Manipulation features 


M1 Theta select 
M2 Protect 

M8 Thefa join 

M4 Outer theta join 
M6& Divide 

Mé Union 

M7 Intersection 

M8 Set difference 
M9 Outer union 


M10 Relational assignment 


M11 Theta select maybe 
M12 Theta join maybe 

M13 Outer theta join maybe 
M14 Divide maybe 


M15 Theta select semantic override (s/o) 
M16 Theta join s/o 

MIZ Outer theta join s/o 

M18 Divide s/o 


ery case, these products (and a few of 
the others) will generate unique keys be- 
hind the scenes, usually by generating a 
sequential number for each record. 
Neither Ashton Tate’s dBASE nor Da- 
taAccess Corp.’s DataFlex contains dic- 
tionary support for the integrity rules or 
features. Relational Database Systems 
Inc.’s Informix does support the entity 
integrity rule (unique primary keys) di- 
rectly in its schema, but it does not insist 
that there be a unique primary key. 
These products also score poorly on 
rule 4 (the dictionary rule) because the 
only way to manipulate their schemas is 


Summary group 


Basic operations 


(2-value logic) 


NULL support operations 


(3-value logic) 


Development 
support 


operations 


The 18 manipulation rules grouped into three categories called the language support features. 


Table 3. 


Product totals by group 


Total Structural Language Independence 
(All groups) group group group 
Products Score % Score % Score %o Score % 
Supra V7 7\ 6 75 3 38 8 100 
Informix 16 67 4 50 6 75 6 75 
NOMAD 2 10 42 6 75 2 25) 2 25 
UNIFY 12 50 6 75 3 38 3 38 
_DataFlex 7 29 4 50 0 0 3 38 
dBASE Ill Plus 10 42 4 50 3 38 3 38 
Revelation 9 38 8 100 0 0 ] 13 
R:base Sys.V 14 58 6 75 4 50 4 50 
Paradox a 46 6 75 3 38 2 25 


~ Percents show fidelity in each group. 


Table 4. 
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through utility programs. Dictionaries 
are not stored as tables that can be ma- 
nipulated like other data. 

The high scorer in this group is, of 
course, Cosmos’s Revelation. Revelation 
insists that some attribute or combina- 
tion of attributes be declared unique by 
the developer. If an attribute is part of a 
record’s primary key, Revelation will not 
allow it to be null (rule 10, integrity 
part). Relation will also ensure that a ~ 
value in a foreign key is represented in 
the primary key attribute(s) of the refer- 
enced table (rule 10, referential part). 

Finally, Revelation is the only product 
in our sample that fully supports the dic- 
tionary rule (rule 4). Not only is its dic- 
tionary a table like the data tables (also 
true of Sincom’s Supra and Ansa Soft- 
ware Corp.’s Paradox), but the dictio- 
nary can also be manipulated like the 
data tables (within Revelation’s manipu- 
lation limits) using identical list process- 
ing or R/BASIC statements. 

Falling just below Revelation in the 
structural group are Dunn & Bradstreet 
Corp.’s NOMAD?2, Unify Corp.’s UNI- 
FY, Microrim’s R:base System V, and 
Paradox. All of these products score 
75%, but for different reasons. 

Supra’s dictionary is a table, but the 
language used to manipulate that table is 
different from the one used to manipu- 
late the data tables, so a developer must 
learn a second language. NOMAD? has 
full support for both parts of the integri- 
ty rule (rule 10), and all three of the in- 
tegrity features. Furthermore, it supports 
all three features at the schema level. 

Supra also supports both parts of the 
integrity rule, but it does not support the 
third feature (user-defined integrity), re- 
lying instead on applications to do edit 
masking and other forms of domain 
checking. (For a review of integrity con- 
straints, see “Data base integrity,” COM- 
PUTER LANGUAGE, June 1987, pp. 
87-94 and “Fidelity and the full relation- 
al model,” COMPUTER LANGUAGE, 
July 1987, pp. 93-97. 

UNIFY is more like NOMAD? in its 
support of the structural group. Its dic- 
tionary is schemalike and cannot be ma- 
nipulated with the same language used to 
handle data. The dictionary can only be 
handled through special utilities provided 
for that purpose. It does contain direct 
support for both parts of the integrity 
rule though, as well as all three integrity 
features (the third feature through what 
UNIFY calls advanced field attributes 
(AFAs)). 

Interestingly, the utility used to create 
and modify the UNIFY dictionary oper- 
ates on what appears as a table to the 
user. In NOMAD2, the schema is treat- 
ed as text and can be edited free-form. 
But the operation of the dictionary list- 
ing utility and the AFAs both suggest a 


“Let’s cheat, 


say you spent the night coding...” 


Database programmers, why waste your 
time hacking out code? 

Imagine how much faster and more profit- 
able you'd be if you could whip up power- 
ful database applications without the 
time-consuming coding pains... 
Introducing Magic PC from Aker, your pro- 
fessional dream come true. It'snot 
another line-by-line syntax treadmill like 
any DBMS or 4GL. 

Finally you can program as quickly as you 
design, while you delegate all the mun- 
dane and redundant coding tasks to 
Magic PC. 


Program 10 times faster 


Develop 
relational 
database 
applications 
10 times fas- 
ter using a 
visual 
design- 
driven inter- 
face. Instead of writing mountains of “how 
to” procedural code, you quickly place your 
program design specs in Execution Tables 
and Magic PC's engine executes them auto- 
matically. Don't lose any more time editing 
and debugging programs by hand. 


Incredible Zoom power 


jscount 


Magic PC's 
pheno- 
menal 
Zoom 
power mag- 
ically co- 
executes 
related 
programs 
through nested Zoom windows smoothly 
with auto data scrolling in all directions. 
While Zooming, query and transfer data 
across windows or even Zoom deeper. 


No more maintenance! 


Change your programs on the fly without 
any manual maintenance responsibility. 
Magic PC automatically updates your 

changes online since all the data describing 
your design (data dictionary, programs and 
menus) make up a single file, self- 
maintaining Integrated Library. 


Magic PC does it all 


Design your entire database application 
with only one comprehensive develop- 
ment system. Generate both online 
programs (screens, windows, 
menus), as well as batch pro- 


grams (reports, updates, S) 
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PARADOX 


import/export, etc.) with full color and gra- 
phics. You no longer fall between the cracks 
dealing with separate and inconsistent 
programming utilities. 


Free LAN features 
Develop multi-user applications for 
local area networks with Magic PC’s 
automatic support for file and 
record locking security. 

Quick prototyping 
Prototype a complete working application 
in just hours and get immediate customer 
feedback to finalize the design. It's a true 
time-saver. 

Stand-alone runtime 
Distribute your applications and protect 
your design with a low cost runtime engine. 
It has the friendliest end-user visual inter- 
face you've ever seen with built-in, menu- 
driven and syntax-free data retrieval power. 


Jeff Duntemann, PC Tech Journal: 


“Magic PC is probably the best integrated 
database application generator that we 
have seen...very smooth system, and 
smoothness comes at a premium these 
days." Also recommended by PC Magazine, 
PC World, PC Week, Computer Language, 
Data Based Advisor and many more around 


the world. 
Try it for $19” 


If you develop database applications fora 
living, you can't afford not to try Magic PC for 
yourself right now. For $19.95 you'll get the 
Magic PC Tutorial software and documenta- 
tion for hands-on evaluation, complete with 
a step-by-step guide to develop an Order 
Entry sample application in just a few 


hours. 
Magic PC 3$69X $199 


No kidding! For a limited time only, save 
almost $500 off the $695 list price, and get 
the complete unprotected Magic PC soft- 
ware for only $199 at our special introduc- 
tory non-resale price. 


Money back guarantee 


Even at $199 you can't go wrong with our no- 

risk guarantee: keep it only if it makes 
magic for you, or we'll buy it back 

within 30 days less $19.95 
restocking fee. 


System Requirements: 
IBM PC, XT, AT, PS/2 
and 100% compatible, 
PC-DOS 2.0 or later, 
512K, hard disk. All 
trademarks 
acknowledged. 


MAGIC PC 
by 
~ 


Cc 
MODULA 2 
PASCAL 


Cross-Compiler Systems 


@High performance, field- 
proven software develop- 
ment systems producing ex- 
tremely compact, fast- 
executing, ROMable output 
code. 


®Each cross-development 
package includes: 


eC, Modula 2, or 
Cross-Compiler 

eMacro Relocating Cross- 
Assembler 

e Object Code Librarian 

e Object Module Linker 

e Hexadecimal Format Loader 
(S-Records, Intel Hex, TEK Hex] 

e Standalone Support Library 
(EPROMable, with full floating 
point support) 


Pascal 


@ All languages can be intermix- 
ed with assembly language 


@Targets supported: 


6301/03 
6801/03 

6809 

68HC11 
68000/08/10/12 
68020/881/851 
32000/32/81/82 


@ Available for following hosts: 


VAX: VMS/UNIX/ULTRIX 
PDP-1 1: UNIX/TNIX/VENIX 
68000: UNIX System V 
PC,XT,AT: MS-DOS 
PowerNode: UTX/32 


UNIX: TM of AT&T Bell Labs. 

VAX, VMS, PDP-11, ULTRIX: 

TM of Dig. Equip. Corp. 

TNIX: TM of Tektronix Inc. 

VENIX: TM of VenturCom 
PowerNode; UTX/32: TM of Gould Inc 


INTROL CORPORATION 
647 W. Virginia Street 
‘Milwaukee, WI 53204 
(414) 276-2937 
FAX: (414) 276-7026 
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schema orientation behind the interface. 

Note that while both UNIFY and 
NOMAD2 fully support rule 10, the na- 
ture of this support differs in the kinds of 
options for user-defined integrity a devel- 
oper has at the dictionary level. 

NOMAD2 has the most extensive 
user-definable integrity types, followed 
by UNIFY and then Supra (though I’ve 
been told Supra’s next release will dra- 
matically extend its capabilities in this 
area). 

Ironically, many programmers consider 
the lack of strong dictionary control over 
the integrity constraints to be an advan- 
tage because it creates an illusion of pro- 
grammer control. Without dictionary- 
level protection, the programmer must 
take more responsibility for ensuring that 
data do not become corrupted. But in a 
serious data base environment, that is the 
job of the data base analyst. More im- 
portantly, programmers do not lose any 
real flexibility in processing data because 
formats can always be converted inside 
the applications when necessary or 
convenient. 

Nor does a powerful dictionary absolve 
the developer from doing appropriate 
data validation. Using the dictionary to 
do validation (with programs fielding re- 
turn code errors) requires extra disk or 
buffer I/O and should be avoided when 
possible. Of course, when I/O would be 
inevitable anyway (for example, in vali- 
dating a foreign key), it is proper to let 
the DBMS do the work. 

R:base supports entity integrity, refer- 
ential integrity, and an assortment of 
user-defined integrity constraints in the 
directory (a level between the dictionary 
and the applications systems). This 
means that the rules supported by the 
data base are not associated with each 
individual attribute but with a table as a 
whole. 

While this approach is within the spir- 
it of rule 10 (because directory control 
makes the rules independent of applica- 
tions code), the number of rules one can 
associate with any given table in its 
R:base manifestation is limited to 20. 

Paradox does not insist that any par- 
ticular field (or combination of fields) in 
a row be guaranteed unique. Like 
dBASE and DataFlex, uniqueness of pri- 
mary keys (assuming a user chooses to 
provide them) can be ensured only 
through the constraints of an index file. 

In addition, while support for foreign 
key integrity exists directly in the dictio- 
nary, such keys can point only to one at- 
tribute of another table; component keys 
are not recognized. 

Paradox also supports some user-de- 
fined integrity constraints in the dictio- 
nary, making it the only product that 
supports the second and third integrity 
features in the dictionary without sup- 
porting the first feature. Paradox thus 
gets only partial support for the integrity 


rule. But unlike R:base, Paradox’s dictio- 
nary is tablelike and can, to a limited de- 
gree, be manipulated like an ordinary 
Paradox table, giving it partial support 
in rule 4 as well. 

One could argue that rule 3 also be- 
longs in the structural group because 
contradictions caused by NULLs are re- 
lated philosophically to the notion of do- 
mains (see “Data base integrity,” 
COMPUTER LANGUAGE, June 1987, 
pp. 87-94). Put another way, an explora- 
tion of the concept of domain must in- 
clude something about what happens 
when a domain instance is null. 

Codd discusses the significance of do- 
main in the relational system at some 
length. He considers it the connection be- 
tween the real world and the tabular rep- 
resentation of it. This system has not 
been ignored by vendors either. But sup- 
port is inconsistent; most vendors supply 
only small subsets of the many kinds of 
edits, masks, ranges, enumerated types, 
and triggered procedures possible. Worse, 
they place their control in the applica- 
tions development language, not the sys- 
tem dictionary! 


our language 
* rules and three 
features are re- 


presented in the language group. All of 
the features here deal with the variety of 
relational operations that a relational 
DBMS language is supposed to support. 

One group represents the basic opera-.. 
tions, including various kinds of joins, se- 
lects, intersections, unions, and 
assignments. 

The second group, those including the 
maybe operations, have to do with how 
NULLs are treated by the various opera- 
tions. A DBMS supporting these fea- 
tures can switch the meaning of NULL 
when necessary to suit the needs of par- 
ticular queries. 

The third group, operations with se- 
mantic override capabilities, allow for 
special operations to override the normal 
concept of domain and produce joins be- 
tween unlike attributes. These operations 
are usually associated with development 
and testing. 

Only NOMAD2 has extensive support 
in all three categories. The next closest is 
Informix, with other products failing to 
have any support in at least one and 
more typically two of the three features. 

The language group (especially rules 5 
and 7) are probably to blame for the 
blurring of the distinction between fourth 
generation languages (as defined by J. 
Martin), and RDBMS (as defined by 
E.F. Codd). 

Martin states that all fourth genera- 
tion languages are based on a DBMS, 
but he does not insist that it be relation- 
al. Codd, on the other hand, connects the 


Sometimes Programming with 
ALICE Can be Dangerous 


ALICE: The Personal Pascal.makes programming 


so much fun it will distract you from other things 
that might need your attention. 


You know ALICE — with its error-correcting editor and over 
600 help screens — is the best system anywhere for learn- 
ing to program. You probably tried the free demo disk on the 
cover of the Jan/86 issue of Computer Language. But did you 
know what else ALICE version 1.3 can do for you? 


Use Turbo Pascal Extensions 


ALICE contains the extensions of Turbo Pascal. That means 
you can write programs quickly with the amazing ALICE 
editor, debug them with the powerful features only the ALICE 
Pascal interpreter/debugger can provide, and then compile 
them at the touch of a button with Turbo Pascal. 


Debug at the Source Code Level 


Single step your program, trace variables, catch references 
to uninitialized memory, trace through graphics. Bugs you 
never even knew about get a one way trip to the roach motel. 


Write Programs Faster 


With fewer keystrokes, put short programs together faster 
than you can with any other system. Play with your programs 
interactively. The 600 on-line help screens give you instant 
access to all the information you need, and you can’t make a 
syntax error with ALICE. 


Have FUN 


There are plenty of systems on the market for the serious, 
professional programmer that needs to get a 100,000 line 
program running by 1989. They’re great, but they’re also 
slow, complicated, costly and just plain not a lot of fun to 
use. ALICE’s interactive feedback turns programming into the 
engrossing, enjoyable task it was meant to be. And if pro- 
gramming can’t be fun, why bother? 


“ALICE may be the most 
advanced programming 
environment currently avail- 
able for the PC.” — Michael 
Covington, PC World 


Atari ST — $79.95 


“It is about as painless a 
method of learning Pascal 
as can be devised short of 
hypnosis. It works!” — Stan 
Veit, Computer Shopper 


For IBM-PC — $95 


ALICE trav css 


The Personal Pascal... 


Textbook — $20 


in, . N. Waterloo, 
N2J2X8 Phone 519/884-7473 1-800-265-2782 


Trademarks: |BM-PC — IBM, Atari ST — Atari, Turbo Pascal — Borland International. 
ALICE refers to ALICE: The Personal Pascal, a trademark of Looking Glass Software 
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The Moving Frontier. . . 


New 


Guarded Horn Clauses 
Kazunori Ueda 


This significant new contribution to the field of program- 
ming language design introduces the parallel logic pro- 
gramming language Guarded Horn Clauses (GHC) that, 
with appropriate restrictions and extensions, is going to 
be a kernal language of Parallel Inference Machines 
being developed at ICOT. Guarded Horn Clauses 
describes various aspects of GHC, including a detailed 
discussion of its design and use, particularly in the treat- 
ment of search problems. It also addresses the general 
problems of parallel computation using logic, comparing 
GHC with other parallel programming languages. $30.00 


The Art of Prolog 


‘Advanced Programming Techniques 
Leon Sterling and Ehud Shapiro 


An introduction and reference to Prolog for profession- 
als and an introduction to Logic programming and 
Prolog programming for students, The Art of Prolog is 
unique in its extremely clear presentation of very 
advanced topics. Examples show how substantial 
Prolog programs can be buillt. 

“Anyone considering a serious programming project in 
Prolog would benefit from this book, particularly the con- 
cluding portions on advanced techniques and applica- 
tions.” — BYTE $29.95 


New 

Supplement the text with software: Programming 
Examples, written in Wisdom Prolog, and adaptable to 
other varieties of Prolog: available in IBM, Macintosh, 
and Amiga, at $15.95 each. 

Wisdom Prolog, by Shmuel Safra and Motti Goldberg, 
features an interpreter designed to build Prolog pro- 
grams with a minimal amount of effort, time, and 
expense. Software is available in three versions, IBM, 
Macintosh, and Amiga, at $95.00 each, and includes a 
30-page manual. 


New 


Logic Programming 
Proceedings of the Fourth International 
Conference 


edited by Jean-Louis Lassez 
The 45 contributions in these volumes consider all 
aspects of logic programming, including theory and 
foundations; architectures and implementations; pro- 
gramming languages and methodology; databases; 
knowledge representation, reasoning and expert sys- 
tems; and relations to other computation models, pro- 
gramming languages, and programming methodologies. 
$47.50 two volume set, paperback 


New 


The Little LISPer 
Trade Edition 


Daniel P Friedman and Matthias Felleisen 


The Little LISPer offers a unique approach to developing 
the skills needed for creative LISP programming, intro- 
ducing recursion as a fundamental tool for expressing 
and solving problems. The authors’ goal is to show that 
recursive thinking is first of all fun, that it is powerful, and 
that the programming language LISP allows one to 
express ideas recursively and naturally. The Little 
LISPer is self-contained: an interpreter for the language 
is developed using the tools of the book itself. 

$12.95 paperback 


Place your order today —call (617) 253-2884. e 
Mastercard and Visa accepted. 
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55 Hayward Street, Cambridge, MA 02142 


concept of relational DBMSs with a 
functional specification of a language. 
Therefore, it is inevitable that this lan- 
guage become a part of whatever it is we 
call a fourth generation language. 

Rule 3 is included in this group be- 
cause its consequences are most often felt 
in queries; that is, systematic treatment 
of NULL values translates into systemat- 
ic treatment of NULL values in relation- 
al algebraic operations (select, project, 
and JOIN), each of which is an oper- 
ation in the relational language. Our cre- 
ation of the summary manipulation 
feature NULLs support is the primary 
reason for including rule 3 in the lan- 
guage group and not in the structural 
group. 

Informix is the star performer in the 
language group because its structured 
query language (SQL) satisfies almost 
all of the elements in rules 5 and 7, and 


it does contain explicit support for 
switching NULLs on and off with respect 
to their implications in queries. Its sup- 
port for rule 5 includes explicit control 
over transaction boundaries through a 
commit statement, and its SQL is capa- 
ble of both creating schemas and mani- 
pulating data for query, insert, and 
update. 

Revelation, by contrast, has no support 
in the language group. It does have a 
very powerful list-processing language, 
but this language has no capacity to 
JOIN tables (accomplished through sym- 
bolic fields in the dictionary) or update 
the data base. 

Other products often fail the tests of 
this group not because they are unable to 
perform all of the operations included in 
a single user interface, but because rules 
5 and 7 specifically state that the inter- 
face language must be expressible as 


DON’T WASTE YOUR TIME! 
Save it with BSW-Make 


BSW-Make is now faster and more powerful than ever! BSW-Make 
speeds software development, by automating the chore of rebuilding 
complex software products after an editing session. No more missed 


compiles! 


No more wholesale ‘‘just in case’’ recompilations of the 


whole product! BSW-Make performs the minimum set of compila- 
tions, assemblies, and links required to correctly update your software 
after each edit. First time — every time. A major timesaver! 


Now imports environment variables (MS-DOS) and logical 


names (VMS) 


Now supports .INCLUDE, .IGNORE, and .SILENT directives 
Macro facility now supports string substitution. 

Syntax compatible with UNIX make 

Works with any compiler, assembler, or linker 


For MS-DOS: only $89.95 


For VAX/VMS: as low as $295.00 


30-day unconditional guarantee! 


Version 6 now shipping! 


for free product information, call 
eal ) 367-6846 
Ask for Department C2 


The Boston Software Works, Inc. 
120 Fulton Street, Boston, MA 02109 
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strings in a one-dimensional dialogue 
with the computer. Contemporary 
user/DBMS interfaces may entirely sup- 
plant the need for the sort of string dia- 
logue that Codd envisioned. Paradox is 
an excellent example. The Paradox inter- 
face is spreadsheet-like. Data can be dis- 
played on forms, but Paradox’s more 
natural representation is explicitly as 
tables. 

Multiple tables in Paradox can be dis- 
played on a screen, fields can be selected, 
and/or JOINs can be performed. The re- 
sult is another displayed table. This table 
can be saved and then manipulated like 
any other table, as feature 3 specifies: 
“The result of any query is another table 
which may be saved and later operated 
on.'” Fields too long to be displayed in 
table format can be dynamically expand- 
ed on the screen, even to a full page. 

Finally, Paradox’s data dictionary is 
also built as a table that can be manipu- 
lated like other tables (within limits). 
Significantly, the Paradox interface pro- 
vides all the features of rules 5 and 7, in- 
cluding the demand that the same 
language be capable of both creating and 
manipulating data and tables. But Para- 
dox’s data dictionary fails rules 5 and 7 
on the technicality that the language in 
question is not expressible as strings. 

The last rule, 12, is also included in 
the language group as the final bulwark 
of data integrity. This rule ties the lan- 
guage and structural groups together. 


In essence, it says that a DBMS’s lan-— ~ ca 


guage support shall not include giving 
any language, whether internal or exter- 
nal, procedural or nonprocedural, the 
power to bypass any of the system’s in- 
tegrity constraints. Any product that 
does not provide for such constraints at 
the dictionary or directory level must fail 
this rule. 

This link between rule 12 and the 
structural features is well illustrated by 
Informix and UNIFY. Informix’s lan- 
guage support is generally superior to 
that of UNIFY, but its support for both 
referential and user-defined integrity is 
at the screen level, while UNIFY’s is in 
the dictionary. Informix’s SQL can sub- 
vert data integrity because so little integ- 
rity checking is done at the right level in 
Informix. 

Subversion via SQL is not possible in 
UNIFY. But UNIFY gets only a partial 
support rating for rule 12, because it is 
possible to bypass UNIFY’s AFAs 
through the C interface. 

One fina! point to note about the lan- 
guage group is that full support does not 
require a DBMS to have support for any 
procedural language, either internal to 
the DBMS or through interfaces to lan- 
guages like C, COBOL, or BASIC. 

All of the language rules can and have 
been satisfied by nonprocedural lan- 
guages (a subject I will address in the 
next several issues), though no product 


To Develop Tomorrow’s Applications, 
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THE MULTITASKING, MULTIUSER MS-DOS REPLACEMENT 


RUNS ON ANY IBM-PC, XT, AT, 80386, OR TRUE COMPATIBLE 
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FEATURES FILE SHARING AND FILE LOCKING 

PROVIDES TRUE CONCURRENT MULTITASKING AND TASK SWITCHING 

SUPPORTS MULTIPLE TERMINALS WITH NO EXTRA SOFTWARE REQUIRED 

FEATURES A USER-CONFIGURABLE WINDOWING INTERFACE 

ALLOWS ADDRESSING OF EXTENDED MEMORY 

FEATURES A FILE PERMISSION SYSTEM 

SUPPORTS THE MS-DOS COMMAND LANGUAGE AND EXTENDS IT WITH COMMANDS LIKE 
PROTECT, PRIV, SPAWN, AND KILL 


ONLY £99 — DISKETTES AND MANUAL INCLUDED 


And You Need The Tools To Get The Job Done Right. . . 


aperene DEVELOPER’S KIT 


GIVES ACCESS TO OVER 80 NEW SYSTEM SERVICES SUPPORTED BY WENDIN-DOS 
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ALLOWS USER PROGRAMS TO ACCESS SYSTEM SERVICES FOR PROCESS CONTROL, 
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on the market is entirely without support 
for procedural languages, and most sup- 
port several. 


he independence 
* group was the 
most difficult to 


score, and the scoring is probably the 
most arbitrary because microcomputers 
do not allow for the kinds of physical 
operations on data available in main- 
frame environments. 

Micro-based DBMS developers do not 
have the power to split or join files phys- 
ically. They can’t make interleave deci- 
sions for performance optimization, nor 
can they choose from among different 
pointer options. 

Supra supports these operations, and 
application programs are not affected by 
them. Informix and UNIFY contain 
some support for shifting files from drive 
to drive when necessary and making sure 
user applications do not notice the 
change. 

Informix has the added capability to 
store different files of the same data base 
on different drives or in different user 
areas without consequence to the appli- 
cations systems. 

UNIFY, along with NOMAD2 and 
R:base, must control internal tables in 
one large file, though NOMAD2 sup- 
ports the splitting of such a file across 
disk boundaries. 

Of the purely micro-based products, 
DataFlex alone contains support for rule 
8 in that the disk on which a particular 
table resides is specifiable in the system 
directory. Thus tables can be moved from 
one volume to another without applica- 
tions being aware of the change. dBASE 
III can also support this operation if all 
the tables are being moved at once and 
applications reference only one drive. 

The independence group is really a 
consequence of the structural rules. 
Physical and distributive independence 
are associated (more or less successfully) 
with all DBMS systems, not just rela- 
tional ones. This is true even on micros, 
where it is reflected in the ability to ref- 
erence data in code without the program- 
mer having to know the order of a field’s 
appearance in a record or a record’s rela- 
tive number in a file. 

DataFlex contains a little more sup- 
port for physical independence than the 
other micro products, but none of them 
fully support the independence rule be- 
cause of a technicality—micro operating 
systems don’t support user tweaking of 
the physical file structure. 

Logical independence is generally as- 
sociated with relational DBMSs. Just as 
generally, it is not fully supported unless 
the DBMS in question also supports a 
true third schema (external view) level. 
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Rule 6 insists that a relational DBMS 
support external views. Features S3 and 
S5 are logical consequences of the table 
concept combined with the powers of the 
relational language. Feature S4 is a link 
between Codd’s relational concept and 
the ANSI/SPARC three-schema archi- 
tecture (see “DBMSs in the real world,” 
COMPUTER LANGUAGE April 1987, 
pp. 95-100). 

Codd specifies that virtual tables be 
supported and automatically updatable 
when the base relations composing the 
table are updated. The ANSI/SPARC 
committee envisioned the same virtual 
table as a data entry point in which base 
relations could be predictably updated 
from modifications made directly to the 
external view. But it was this idea, and 
not only the table concept of the relation- 
al model, that made DBMS implementa- 
tions with true logical independence 
possible. 

The foregoing analysis is interesting 
both academically and as an illustration 
of the variety of strategies used to imple- 
ment the relational philosophy. It is clear 
from sales and the kinds of uses made of 
these products that support for the rules 
as a whole (or in their groupings) cannot 
be used to predict the productivity poten- 
tial of a given product. 

Support for the rules (especially in the 
context of their separate groups) does 
help to evaluate a product against the ap- 
plication-specific requirements. The rules 
are a wish list for maximum flexibility, 
as this was understood at the time of 
their writing. 

Lack of support for a particular rule 
or rule group means that a developer 
must determine exactly how to compen- 
sate for what is missing and the cost of 
doing so, or whether such compensation 
is necessary at all. 


usiness data base 
* applications fall 
broadly into two 


categories data processing and manage- 
ment information systems (MIS). Indi- 
vidual applications often contain 
elements of both. 

Accounting (payables, receivables, led- 
gers, inventory, purchasing, billing, etc.) 
is the quintessential data processing op- 
eration. Such operations are character- 
ized by a stable structure, with keyboard 
input of detailed data elements (such as 
invoice line, customer address, and em- 
ployee skills). These elements are treated 
consistently by complex expressions in- 
volving numerous mathematical and rela- 
tional operations to generate a known set 
of outputs on a regular basis (daily, 
weekly, and monthly reports; checks; in- 
voices; etc.). 

MIS applications tend to operate on 
summary data, often not keyed in but 
loaded directly into tables from data pro- 


cessing outputs or other external sources 
of data such as timelines or text data 
from remote data bases, financial model- 
ing summaries, or job management tools. 
For this reason there is less need for low- 
level data verification. 

MIS applications require frequent de- 
velopment of new tables or alteration of 
existing ones. MIS tables tend to be 
simpler than data processing tables, and 
there is less or even no intertable data 
manipulation at entry. 

In contrast to the regular (though pos- 
sibly complex) data processing output, 
MIS output requirements are far more 
volatile. The report never before created 
is the rule rather than the exception, so 
the need exists for a highly flexible and 
powerful nonprocedural query capability. 

Support for data processing applica- 
tions always demands a powerful proce- 
dural language interface (third or fourth 
generation). This need helps to explain 
the popularity of dBASE and DataFlex, 
which both support rich internal proce- 
dural languages. 

UNIFY and Informix also have vari- 
ations with internal procedural languages 
as well as interfaces to such third genera- 
tion languages as COBOL and C. Data 
processing-type applications and proce- 
dural languages have fit together for sev- 
eral decades. It is not without reason 
that the vast majority of business appli- 
cations are still maintained in COBOL 
(even when that COBOL uses a DBMS 
through some interface). 


COBOL was designed with data pro- 


cessing operations in mind. As data pro- 
cessing applications become larger, 
sometimes encompassing several depart- 
ments or entire companies, there is more 
need for the integrity support provided 
by the dictionary of a powerful DBMS. 

While some moderately large applica- 
tions have been successfully built using 
dBASE and DataFlex, the danger always 
exists that the next programmer on the 
next system enhancement will fail to con- 
sider a critical edit and open the door to 
corrupted data. 

But the same characteristics that 
make dictionary integrity control and 
procedural languages desirable in data 
processing render strong nonprocedural 
ad hoc query facilities and SQL-like 
data manipulation languages unneces- 
sary. Accounting systems do not sudden- 
ly require new tables or data views. 

Ad hoc reports are an exception, so 
special utilities that will build and main- 
tain tables and the need to write many 
reports with procedural code are not as 
inconvenient as one might think. « 

Once tables are built and reports are 
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provides complete information, advice, guarantees and every product for Microcomputer Programming. 


spaghetti 


BASIC 


indented,structured - 


C/TURBO 


Benchmark BASICA Turbo Lattice C 


597 _sec 


Matrix (double) | 55 sec [No double] 6 sec | 


BAS C $169 


BAS PAS $129 


Free information about BAS_C,BAS_PAS, call 
Gotoless Conversion, Box50068, Denton, TX76206 


Phone (214) 221-0383 


Demo Disk $5.00 


Add Data Security to Your C Programs 


Add Fast or Thorough Encryption 
or Compression to Your Programs 
WITHOUT Royalties 


Build the safest and most popular methods of 
protecting your data directly into your program 
without paying royalties. Don’t worry if you're 
not sure what to use. The discussion of security 
methods in the manual (with demos on disk) 
will help you make a choice based on your 
application. 

With Security Library you can: 
¢ Keep files secure on a multi-user network 
¢ Speed up data transmission and 

communications through data compression 
* Control access based on privileges given to a 

hard disk or LAN user 

“I create custom software for business 
applications. I'm using the Security Library to 
encrypt so that certain information will not be 
readily available. The documentation is 
excellent. It gives a thorough explanation about 
how you can secure a file.” 

— Bruce Philips, Custom Software Design 

Virginia Beach, CA 


Requires MSDOS 20+ Works with Microsoft C and Computer Innovations” 
C86. Please specify compiler when you order 


Object only: $115 
With Source: $229 


Call Today for FREE detailed 
information or try RISK-FREE 
for 31 days 


You Choose the Security Level 
Algorithms provided include The National 
Bureau of Standards’ Data Encryption Standard 
(DES) and the Vernam and Vegenere ciphers. 


Encrypt a 10K file in 3 seconds with one method ~ 


or 50 seconds with another. 

Six algorithms are provided, along with 
password and non-password encryption 
schemes. 

Valuable Extras 

The Huffman coding routine can reduce the 
size of a file by 25 to 50%. The routine to change 
the attribute bytes of a file can make that file 
invulnerable to casual browsing or accidental 
deletion. There’s even a program to change 
every byte of a file to a null character - not 
even un-erase programs can recover it then! 


Call 800-821-2492 to order Security 
Library risk-free for only $125. Source 
& Object is $250. 

> ° 
sition. 
335-P Washington St., 


Norwell, MA 02061 
(617) 659-1571 


800-421-8006 


HOURS: 8:30 A.M.-8:00 P.M. E.S.T. 


5-LPond Park Road, Hingham, MA 02043 Mass: 800-442-8070 or 617-740-2510 5/87 
CIRCLE 20 ON READER SERVICE CARD 


Turbo Pascal to C 


TP 2 ; Translation for 


POWER, PRACTICALITY, and 
PORTABILITY 


¢ Write More Powerful & Flexible Programs 
Easily Get Started with C Programming 

* Keep Your Valuable Pascal Investment 
Port Your Pascal Programs to UNIX and 
Many Other Environments 


TP2C translates better than 95% of your Turbo source; the 
clearly written documentation contains guidelines for final 
hand-conversion. 


TP2C produces standard C code direct from Turbo Pascal 
programs. Create function libraries from Pascal routines. 
Use TP2C as aC learning aid. Move Turbo programs to Unix 
or other machines. Translate whole programs or program 
segments. TP2C even handles nested procedures and inline 
assembly statements. 


Try TP2C for 30 days without risk. If you're not satisfied within 
that time, return it for a full refund. 


For PC-DOS and MS-DOS machines. 


”? List: $249 
BISS of Louisiana Ours: $199 
(504) 295-0260 
5432 Superior Drive, Suite A-1, Baton Rouge, LA 70816 


 eiesieior nisin caesehacaas sc eS 


FREE*: Probe the Minds of 19 
World-Class Programmers! 


Programmers at Work is a fascinating collection of interviews with industry 
leaders like Jon Sachs, Wayne Ratliff, Dan Bricklin, and Bill Gates. ‘‘Prefaced 
by a short biography and including program doodles and samples of source code, 
each interview examines the forces, the events, and the personality traits that have 
influenced the programmers’ work.” 


FREE* or Only $14.95! 


— from the jacket 


* Order any producton this page OR 
$250 of any software and get 
Programmers at Work FREE! 


NOW: Special OFFER! 


via coupon (or mention this ad) 


Payment method: ___ Check/MO ____ MasterCard/VISA 
Acct. # Exp.: 


Your Computer: O/S: 


Name: 


Street: 


City: 


SUNS otek See i) ee 2 


Item: Price: 


UPS Ground $3/item, Air $6/item. (except book): 


(Call about other methods) Total: 
Offer expires 9/30/87. 
The Programmer’s Shop, 5 Pond Park Rd., Hingham, MA 02043 
(800) 421-8006 or in MA (617) 740-2510 L 


Prolog Program 
Development Tools 


Library Source Code Included 


Turbo Prolog, Arity/Clocksin & Mellish Syntax 


Trace Utility 

Lets you trace your Prolog program while 
eliminating distracting low level detail. 
Program Executive 

Partitions large Prolog programs into a flowchart 
(state diagram) of modules. Eliminates backtracking 
between modules. 

Structured Program Library 

IF-THEN-ELSE, WHILE, REPEAT, and FOR loops in 
Prolog. Make your Prolog programs more powerful 
by incorporating these features from FORTRAN, C, 
PASCAL, and BASIC. 

User Help Utility 

Generate as many of your own Help Files for your 
Prolog programs as you want. You determine the 
Help File to be shown at any point in the program. 
The user of your program can invoke a Help File at 
any time they desire by just pressing the right key. 
Math Library 

Math Functions written as Prolog predicates allow 
you to perform mathematical operations on data. 
Lets you evaluate infix expressions containing 
variables and functions from Prolog. Gives you the 
power of FORTRAN in your Prolog programs. 

List Handling Library 

Over 30 standard list operations including union, 
intersection, complement, concatenate, specializa- 
tion, generalized mapping, sorting and display 
predicates. 

String Handling Library 

Over 20 predicates including justification, classifi- 
cation, concatenation, formatting, and scanning. 
You can customize the scanner for special purpose 
scanning. 

Tree Library : 

15 different predicates for building, traversing and 
changing trees which allow an arbitrary number of 
subnodes per node. 

Global Variables Library 

Allows you to use global variables in Prolog. 
Reassign different values to the same variable. 
Sample Programs 

Sample Prolog programs show you by example 
how to implement Prolog Tools into your programs. 
Instant Recall Developer's Demon 

Receive at no extra charge Instant Recall's 
Developer's Demon which includes a Prolog Tutor 
which shows you how to use the Prolog Tools, an 
Interpreter which allows you to test a Prolog Tools 
predicate with your data before incorporating it into 
your program, and a Librarian which creates a 
source file of the Prolog Tools you have selected. 


Prolog Tools were developed by Instant Recall, an 
Al systems development group, for their own use. 
It has been used to develop Prolog Programs for 
their clients. Some of these programs are national- 
ly advertised and marketed. Now, you can have the 
source code of these same tools to develop Prolog 
programs. 

Prolog Tools comes complete with a 170 page 
Reference Manual. 

Prolog Tools only $149.00 per copy (not copy pro- 
tected, no royalties) 

Please specify either Turbo Prolog, or Arity/ 
Clocksin & Mellish Source code, or order both for 
$199.00 ‘ 

Visa/MasterCard Orders: Call the Library Store 
(301) 652-8811 [Orders Only] 

Or send check or money order to: 

Instant Recall $99.00 per ver 
5900 Walton Road, Box 30134 SRD 
Bethesda, Maryland 20814 is received prior 
Telephone: (301) 530-0898 to Decembe: 


Domestic orders: Add $5.00/per item 

for shipping & handling. 

Foreign orders: Add $10.00/per item for shipping 
& handling. We accept Bank Drafts drawn on U.S. 
Banks. 

Maryland residents: Add 5.0% sales tax. 

Dealer Inquiries Welcome 


written they will probably not require 
many changes for long periods of time. 
By contrast, MIS applications thrive on 
the ability to develop new tables and spe- 
cial reports because the nature of MIS is 
such that one is trying to answer ques- 
tions never before asked. Complex inter- 
table processes are absent in MIS, but 
complex joins between two, three, or 
more tables for output are common. 

In MIS applications, powerful nonpro- 
cedural report and form generators are 
more important than procedural lan- 
guages. MIS-type DBMS systems also 
benefit from a flexible capacity to accept 
data in various formats from other sys- 
tems and conveniently load them into ap- 
plication tables. 

Almost all of the micro products now 
contain gateway utilities, with flat, com- 
ma-delimited ASCII tables as common 
denominators for cross-product data 
transfer. 

Application scope is also an important 
factor in the best choice for a DBMS. 

MIS applications may draw on data 
from every department in a large corpo- 
ration, but the MIS system itself is usu- 
ally small because it is focused to 
produce information required by middle- 
and upper-level management and oper- 
ates upon summary data, further sum- 
marizing and projecting. 

Some MIS applications may manipu- 
late tens of thousands of records, but 
they are built to support management’s 
need to filter, compare, evaluate, and dis- 
cover new relationships among seemingly 
unrelated data. This contrasts with data 


DP vs. MIS applications 


processing, whose job it is to accurately 
generate large volumes of known outputs. 

Typical outputs of a MIS application 
might be a graph or a small table. The 
game in data processing is not summari- 
zation but volume; hundreds of thou- 
sands of pay checks, thousands of 
transactions a day in banking, airline 
reservation systems, etc. 

MIS tables are more independent of 
one another, lacking the many crosstable 
checks during data acquisition. They do 
not have large numbers of input points or 
dozens (or even hundreds) of tables with 
many foreign keys as is typically the case 
in data processing applications. Such ap- 
plications can have literally thousands of 
input points (for example, an automated 
teller machine system), with virtually ev- 
ery data item independently validated. 

Table 5 concludes this month’s column 
by placing the products I’ve been talking 
about in a matrix of MIS, data process- 
ing, and size considerations. We will see 
more clearly how these placements are 
justified as we begin to explore the lan- 
guage features of various products next 


month. | 
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Relative 


DP-oriented §—=———————_—» _ MiS-oriented 


Very large 
operations 
> 100,000 
records 
> 1,000 
attributes 
> 100 


relations 


UNIFY 


DataFlex 


Size 


Small 
applications 
<= 25 
relations 
< 100 
attributes 
< 5,000 
records 


emphasis 


NOMAD2 


Informix 


Revelation 


ABASE Ill PLUS Paradox 


R:base Sys. V 


Products arrayed in matrix by application size. Small applications are not necessarily sin- 
gle user. Size is a function of both record volumes and number of relations/attributes. The 
y axis is not to scale and is meant only as an approximation for magnitude reference. 
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Microsoft. C 


Optimizing Compiler 


ter char »alf Add Watohs.. Ctrl 
ter CTL xctl} c 


short fil] ME C mt of files on 
etl-Pdebu = rt out vith no 


7* now go find flags and files on cnd line */ 

while (—-arge) 

ti 
/* first uppercase the arg to simplify parsin 
upper ©H+4argu); 


/* check command line for flags */ 
if Gerargy == ’-") 
{ 


/* interpret flags if found */ 
switch Gctmargy) 


{ 


Fast Execution Speed. 


Microsoft® C 4.0 Microsoft C 5.0 
Sieve (25 iterations) Wy | 3.3 | 
14,2 
* New optimizations generate the fastest code: 
—Inline code generation.NEW! 
—Loop optimizations: NEW! 
—Loop invariant expression removal. NEW! 
—Automatic register allocation of variables. NEW! 
—Ehmination of common sub expressions. 
—Improved constant folding and value propagation. 
«Fine tune your programs for even greater speed: 
—Coding techniques for writing the fastest possible 
programs are included in the documentation. NEW! 
—Segment Allocation Control: 
—Group functions into the same segment to get faster 
NEAR calls. NEW! 
—Specify which segments receive variables to yield 
faster NEAR references. NEW! 
—Uses register variable declarations. 
—Mix memory models using NEAR, FAR 6 HUGE 
pointers. 


Benchmarks run on an IBM* Personal System/2™ *Time is negligible. 


Speed. 


Fast Compilation. 
Fast Prototyping. 


Microsoft C Version 5.0 includes QuickC™ which 

lets you edit, compile, debug, and execute in an 

integrated environment. It’s ideal for prototyping. 

eIn-memory compilation. at over 10,000 lines/ 
minute. NEW! Ne 

» Built-in editor with parentheses, bracket and 
brace matching. 

e Use the integrated debugger to animate through 
your program, add watch variables and set 
dynamic breakpoints. NEW! 

e MAKE file is automatically generated for you. 
Simply indicate the modules you want to use, 
then MAKE recompiles and links only those 
modules that have changed. NEW! 

eFull C 5.0 compatibility: 

—Completely source and object code compatible. 
—Emits CodeView®-supported executables. 
—Identical compile/link command line switches. 


Fast Debugging. 


Microsoft C Version 5.0 includes Microsoft CodeView, 
our source-level windowing debugger that lets you debug 
more quickly and thoroughly than ever before. 

° Debug larger programs: 

—Debug through overlays created by the 
Microsoft overlay linker. NEW! 

—Expanded Memory Specification (EMS) 
support. NEW! 

Fast debugging through precise control of your 
program execution: 

—Access source level and symbolic debug information 
from your Microsoft C, FORTRAN, and Macro 
Assembler programs. NEW! 

—View your source code and assembly simultaneously. 

— Watch the value of variables change as you execute. 

—Set conditional breakpoints. 

—Animate or single step through your program. 

CodeView brings you as close as you’ve ever been 

to your hardware: 

—Swap between your code and output screens. 

— Watch your registers and flags change as your 
program executes. 


C 5.0 will be available soon. If you purchase Microsoft C 4.0 after June 1, 1987, 
welll give you a C 5.0 upgrade. Free. For your free information packet, call: 


(800) 426-9400. 


Microsoft, the Microsoft logo and CodeView are registered trademarks and QuickC is a trademark of Microsoft Corporation. 0587 Part No. 098-048-615 
TBM is a registered trademark and Personal System/2 is a trademark of International Business Machines Corporation. 
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News about the Microsoft Language Family 


Microsoft® Macro Assembler 
Version 5.0 
Microsoft Macro Assembler 

Version 5.0 has a host of 
exciting new features that 
make assembly language 
programming easier and 
more powerful than ever! 
Microsoft Macro Assembler 
Version 5.0 now includes the 
Microsoft CodeView* window- 
oriented debugger and can 
assemble instructions written 
for the Intel® 80386 CPU. Comprehensive 
documentation and example programs help 
you write assembly code subroutines that can 
be called from other Microsoft languages such 
as C, BASIC, FORTRAN, and Pascal. Microsoft 
Macro Assembler Version 5.0 also assembles 


your programs 25-40% faster than Version 4.0. 


Now it’s easy to write assembly language 

subroutines for high-level language programs 

If you have always wanted to write fast 
assembly language subroutines to make your 
programs fly, now is the time to try Microsoft 
Macro Assembler Version 5.0. Version 5.0 
comes with a completely new Mixed-Language 
Programming Guide, which describes in clear, 
step-by-step language how to write, assemble, 
and link an assembly language subroutine 
with your Microsoft BASIC, C, FORTRAN, or 
Pascal programs. The examples from this man- 


ual are provided on disk so you can use them-=> 


as templates, filling in your own code and 
leaving the prologue and epilogue instructions 
that make the interface function correctly. 
Now Microsoft Macro Assembler Version 5.0 
makes segmentation easy. Our new “simplified 
segmentation” directives are short, straight- 
forward, and intuitive: To declare the correct 
model for your subroutine, 
just use the .MODEL 
directive and choose the 
model you need: SMALL, 
MEDIUM, COMPACT, 
LARGE, or HUGE. To start 
your data segment, just add 
a .DATA directive; to set 
your stack, add a STACK 


Look for the Microsoft Languages Newsletter every month in this publication. Micresoft 


Microsoft Macro Assembler’s CodeView at Work. 


Latest DOS Versions: 
Microsoft C Compiler 
Microsoft COBOL 

Microsoft FORTRAN 


Microsoft Macro Assembler 
Microsoft Pascal 
Microsoft QuickBASIC 


directive; and to begin 
writing instructions, use the 
.CODE directive. 


Microsoft Macro Assembler 
now includes the CodeView 
source-level debugger 

CodeView, Microsoft’s 
famous debugger for its C 
and FORTRAN languages, 
now comes to the world of 
assembly language program- 
ming. Source-level debugging 
allows you to view your program just as you 
wrote it, including the comments and spacing 
that are especially important in helping you 
follow your program’s execution. You can 
access variables by name, even if they aren’t 
declared public, and see constants as names 
instead of as anonymous numbers. 


Write programs for the 80386 


Microsoft Macro Assembler Version 5.0 can 
assemble the new instructions available with 
the powerful 80386 CPU and the 80387 math 


coprocessor, as well as 80286 instructions that” 


have been enhanced to work with 32-bit 
registers. You can also use the new 32-bit 
wide registers to write faster programs than 
ever by using such operations as 32-bit 

add and subtract and 32-bit multiply and 
divide without using multiple registers. For 
more powerful data access Microsoft Macro 
Assembler Version 5.0 allows you to choose 
any 32-bit register for indirect memory access, 
to use “‘scaling”’ for easy array access, and to 
move 32 bits of data directly from memory 
into a register and back. 


For more information on the products and 
features discussed in the Newsletter, write to: 
Microsoft Languages Newsletter, 16011 NE 
36th Way, Box 97017, 
Redmond, WA 98073-97177. 
Or phone: (800) 426-9400. 
In Washington State and 
Alaska, call (206) 882-8088. 
In Canada, call (416) 
673-7638. 


Microsoft, the Microsoft logo and CodeView are 
registered trademarks of Microsoft Corporation. 
Tntel is a registered trademark of Intel Corporation. 


The Five 
Dining 


Philosophers 


A Scheduling Problem 
in Modula-2 


By Dale E. Parson 


he Dining Phi- 

losophers prob- 

lem is quite 

familiar to stu- 
dents of operating systems design. It is 
used to demonstrate the principles of 
deadlock, a condition where competing 
processes render one another incapable of 
completion through greed for nonshar- 
able resources and poor planning. 

This particular problem models five 
concurrent processes as five hungry phi- 
losophers seated at a round dining table. 
Before each philosopher is a meal to be 
eaten, normally consisting of either rice 
or spaghetti. (In the case of the accom- 
panying Modula-2 program, the meal 
consists of cookies.) Between each pair of 
philosophers sits a fork, so that five phi- 
losophers and five forks alternate at the 
table. Any given philosopher is capable 
of performing only one action, either 
thinking or eating, at a time. 

Initially, all five are thinking. To eat, a 
philosopher first must pick up the fork to 
his left, then pick up the fork to his right, 
and finally eat some of his meal with the 
forks. Some time later this philosopher 
puts down both forks and resumes think- 
ing for awhile, then reaches for his forks 
again to eat. If all goes well, these ac- 
tions continue until all of the philos- 
ophers have consumed their meals. 

Since each philosopher shares his left 
fork with his left neighbor and his right 
fork with his right neighbor, it is not al- 
ways possible for him to obtain a fork 
immediately after he is finished thinking. 
When a fork is not available, the philos- 
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opher waits until it is returned by his 
neighbor. 

Deadlock occurs when each philos- 
opher has obtained one fork (say, the left 
fork) and reaches for the other fork, 
which is already held. Then all five phi- 
losophers begin waiting for the other fork 
to be released. But since none of the five 
will return a fork while waiting, none 
can ever get the fork, and they wait in- 
definitely (or at least until they starve). 
This circular waiting of a process for an- 
other process that is waiting, either di- 
rectly or indirectly, on the first process 
constitutes deadlock. 

Various strategies exist for avoiding 
deadlock in the Dining Philosophers 
problem. I have not attempted such a so- 
lution here; in fact, I intentionally allow 
deadlock to occur:to illustrate the prob- 
lems of timing-dependent code. This pro- 
gram is meant to show a method for 
supporting scheduling of concurrent pro- 
cesses in Modula-2. 


The philosopher’s module 
Listing 1 shows MODULE Philos from 
file philos.mod. (All code is written in - 
Logitech’s implementation of Modula-2 
for MS-DOS.) This module defines the 
actions of a philosopher in the abstract 
terms of thinking, reaching for a fork, 
eating, and returning a fork to the table. 
These abstract actions are supported 
by code in MODULE Table; the import 
list for the latter module is seen near the 
top of Listing 1. Next come import lists 
for the standard MODULE InOut and 
Logitech’s MODULE Random; the latter 
is used to support number generation for 
random think, pause, and eat times. 
PROCEDURE Philosopher contains 


instructions for each philosopher. Initial- 
ly, a number that uniquely identifies the 
philosopher is requested; this number will 
be used when reporting actions to the 
terminal. Next, a loop where the main 
actions are performed is entered. It will 
be exited when the philosopher has either 
finished his meal or starved due to 
deadlock. 

The first action is thinking. 
RandomInt is called to provide a random 
think time from 1 to 5 seconds; it is 
qualified with its MODULE name Ran- 
dom simply to illustrate deferred qualifi- 
cation in Modula-2. This function does 
not require an externally supplied seed 
value and generates a different sequence 
of numbers each time the program is 
run. 

A call to Think is made, surrounded 
by terminal output code. Other philos- 
ophers are free to act while this one 
thinks. The think time parallels I/O re- 
quests, which cannot be immediately sat- 
isfied in multiprogramming systems. 
Consider, for example, disk input: while 
a process requesting data from a disk 
waits for the head movement, disk rota- 
tion, and data transfer to occur, other 
processes are given access to the CPU. 

Upon completion of thinking, the phi- 
losopher requests the left fork by calling 
GetFork. If the fork is not in use, Get- 
Fork returns it immediately; otherwise, 
GetFork causes the philosopher to wait 
until the fork is available. As always, 
other philosophers are free to act while 


le File “philos.mod" - main module for dining philosophers 
program. This module defines the action of each (concurrent ) 
Philosopner. Dale Parson, Spring semester, 1987. : 
Concurrency is controlled from module Table. 


*) 


MODULE Philos ; 


FROM Table IMPORT GetID, Think, GetFork, Eat, GiveFork, ForkName, 
LeftOver, ExcuseMe, SetTable, EatMeal ; (* concurrent meal support *) 
FROM InOut IMPORT WriteString, WriteInt, WriteLn ; 
IMPORT Randan ; (* Turbo Pascal / Modula-2 ee will be qualified below *) 
HRR KK KKRKR KR KK ERE KKK KKK ERK EHH EK KEK EERE KEKE KERR KK KE RER ERE KER *) 


: Following is action sequence of each philosoqpher S)) 


PROCEDURE Philosopher ; 
VAR time : INTHGER ; (* used to maintain eat & think time *) 
myid : INTEGER ; (* my identification number *) 


BEGIN 
myid := GetID() ; (* get this philosopher's i.d. number *) 
LOOP (* eat until all cookies gone - exit is by way of procedure Excusefe *) 


(= THINKING 3) 

time := Randam.Randomint(5) + 1 ; (* thinking time with no forks *) 
(* 1 to 5 seconds, NOTE QUALIFICATION *) — 
WriteString('Philosopher '); WriteInt (myid,@); (* which one *) 
WriteString(' will think for '); (* identify action & duration *) 
WriteInt(time,9); WriteString(' seconds.'); WriteLn; 

Think(time); (* others will act during this time *) 
WriteString('Philosopher '); WriteInt(myid,J); (* which one *) 
‘WriteString(' has completed thinking.'); Writebn; 


ee GET LEFT FORK  *) 

WriteString(* Philosopher '); WriteInt (myid, ®); (* which oe *) 
_ WriteString(' reaching for left fork.' )y WriteLn; 

GetFork (Left) ; 

WriteString( ‘Philosopher '); Writeint (myid, @); (* which one *) 

WriteString(' has obtained left fork.'); WriteLn; 


e THINKING *) & 
time := Random.RandomInt(5) + 1 ; (* thinking time between forks *) 
(* 1 to 5 seconds, NOTE QUALIFICATION *) 

WriteString('Philosopher '); WriteInt (myid,@); (* which one *) 
WriteString(' will pause for ‘); (* identify action & duration *) 
Weitelnt(time,@); WriteString(' seconds.'); Writebn; 

Think(time); (* others will act during this time *) 
WriteString('Philosopher '); WriteInt (ayid, 9); (* which one *) 
writeString(' has completed pausing.'); WriteLn; 


(Ga GET RIGHT FORK *) 

»  WriteString('Philosopher '); Writelnt (myid, @); (* which one *) 
WriteString(' reaching for right fork.'); WriteLn; 
GetFork (Right); 
WriteString('Philosopher ‘); Writernt (mys, ge Ae ee one a 
WriteString(' has obtained right fork.'); WriteLn; 


Listing 1. (Continued on (lotie page) 
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one or more of their brethren wait. This 
waiting mirrors blocking for nonsharable 
resources in a multiprogramming 
environment. 

When the fork is obtained, the philos- 
opher again thinks for 1 to 5 seconds, re- 
porting this interval as a pause. This 
second interval assures that even though 
both forks may be available when the left 
fork is obtained, the right fork may be 
unavailable when it is requested. 

The request to GetFork for the right 
fork is now made. Blocking may occur 
here. 

At last, with both forks in hand, the 
philosopher eats for a random interval of 


ee EAT *) 


1 to 10 seconds. One cookie is consumed 
per second. The number of cookies ini- 
tially on the plate is set within MOD- 
ULE Table; function LeftOver returns 
the number of cookies remaining on the 
plate. Adjacent philosophers cannot be 
eating at this time since each is unable to 
obtain at least one fork. 

After eating, the philosopher calls 
GiveFork to return the forks to the table. 
Then the remaining cookie count is 
checked. If the meal is finished, then Ex- 
cuseMe is called and the philosopher 
leaves the table. Otherwise, execution 
continues at the top of the loop with an- 
other interval of thinking. 


time := Random.Randomint (1d) + 1; (* 1 to 16 cookies *) 
IF time > LeftOver() THEN (* you can only eat what's left *) 


time 
END ; 


WriteString('Philosopher '); WriteInt(myid,0); (* which one *) 


:= LeftOver() 


WriteString(' will eat '); (* identify action & duration *) 
Writeint (time,¥); WriteString(' cockies.'); Writebn; 
Eat (time); (* others will act during this time *) 


WriteString('Philosopher '); WriteInt(myid,9); (* whicn one *) 


WriteString(' has completed eating.'); Writebn; 


The initialization code at the bottom 
of MODULE Philos sets the program in 
motion. SetTable is called to identify the 
philosopher process and allow the under- 
lying support code to initialize its data. 
Then EatMeal is called to start the 
meal. A return value of TRUE signifies 
meal completion by all five philosophers; 
FALSE signifies deadlock. The outcome 
is reported and the program exits. 

Listing 2 shows a sequence of actions 
leading to deadlock. After some initial 
thought time, philosopher 4 manages to 
get both forks and goes on to eat two 
cookies in 2 seconds. During that time, 
philosophers 2, 1, and 3 obtain their left 


GiveFork (Left); GiveFork (Right); (* put forks back immediately *) 


IF LeftOver() = 9 THEN 


WriteString(‘Pnilosopher '); WriteInt(myid,0); (* which one *) 
WriteString(' has completed his méal.'); WriteLn; 
ExcuseMe (* done eating, leave the table *) 


ELSE 


WriteString('Philosopher '); WriteInt(myid,¥%); (* which one *) 
WriteString(' has '); WriteInt(LeftOver(),¥); 
WriteString(' cockies left to eat.'); WriteLn ; 


END 


END (* unless excused go back up & do it again *) 


END Philosopher ; 


(* ae KKK KK KKK KKK KK KKK KK KK REE RE RRR RRR EK KEKE KEE KKK KEKE REERE 
Es MAIN, MEAL INITIATING CODE *) 
- BEGIN 


=) 


SetTaple(Philosopher) ; (* set the table, seat the philosophers *) 
IF EatMeal() THEN ; (* return here upon meal completion *) 


ELSE 
END ; 
fee 
ND Philos. 


Listing 1. (Continued from preceding page) 


WriteString('Meal consumed.') (* no deadlock *) 


WriteString('The philosopners have starved. ') 


forks. Now 4 returns his forks and both 
0 and 4 pick up their left forks. 

At this point, each is holding his left 
fork, and each reaches for the right fork. 
Deadlock is reported; only two cookies 
have been eaten. 

Listing 3 shows only part of a success- 
ful meal; the entire sequence is inordi- 
nately long. This partial listing is 
included to demonstrate that successful 
completion is possible. Unlike conven- 
tional, sequential code, in which execu- 


tion speed does not determine the success 
of an algorithm, a concurrent program 
can incorporate timing dependencies that 
will allow a program to succeed'on some 
test runs and fail on others, strictly on 
the basis of speed variations. ; 
Running the same program with iden- 
tical data can produce different results. 
Listing 2 differs from Listing 3 because 
the random think and eat times are dif- 
ferent. Accidental timing differences de- 
termine the success or failure of timing- 


Philosopher 3 will think for 4 seconds. 


Philosopher 4 will think for 1 seconds. 


Philosopher @ will think for 5 seconds. 


Philosopher 1 will think for 3 seconds. 


Philosopher 2 will think for 2 seconds. 


Philosapher 4 has completed thinking. 
Philosopher 4 reaching for left fork. 
Philosopher 4 has obtained left fork. 
Philosopher 4 will pause for 1 seconds. 
Philosopher 4 has completed pausing. 


NOTE: 1 page of output deleted 


° 


Philosopher 4 has completed pausing. wes 


Philosopher 4 reaching for right fork. 


DEADLOCK Detected! 

Philosopher @ reaching for fork 1, 
Philosooher 1 reaching for fork 2, 
Philosopher 2 reaching for fork 3, 
Philosopher 3 reaching for fork 4, 


Philosopher 4 reaching for fork J, 


The philosoghers have starved. 


Listing 2. 
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remaining cookies on plate = 25 
remaining cookies on plate = 25 
remaining cookies on plate = 25 
remaining cookies on plate = 25 


remaining cookies on plate = 23 


dependent concurrent programs. Good 
concurrent programming practices at- 
tempt to eliminate time dependencies. 


Service procedures 

Listing 4 shows the DEFINITION 
MODULE Table from file table.def. Pos- 
sible values for a fork are enumerated as 
Left and Right. 

The remainder of this module identi- 
fies the procedures MODULE Philos. has 
used in executing the meal. These proce- 
dures provide access to the underlying 
meal support code of the implementation 
module and model the interface provided 
by the system call mechanism in a multi- 
programming system. Like system calls, 
these procedures are used to request ser- 
vices and resources from the support 
code. Calling them may cause the calling 
process to block until its request can be 
satisfied. 

Listing 5 shows IMPLEMENTATION _._--—- 
MODULE Table from file table.mod. 
This module constitutes the support code 
and includes the definition of the sched- 
uler and timer interrupt handler, in addi- 
tion to the access procedures made 
visible in the definition module. 

After some standard import lists come 
important data declarations. A philos- 
opher exists in one of five states, as enu- 
merated by the mode types defined here. 
He may be ready to act; any philosopher 
who is currently not waiting for anything 
is in this state. Other states identify 
thinking, eating, reaching (for a fork), 
and excused philosophers. 

TYPE PCB, the philosopher control 
block, records the current condition of a 
philosopher. The context field is used by 
TRANSFER calls to allow a philosopher 
to execute. The state field records the 
current state, remainder shows the num- 
ber of cookies left on the plate, waittime 
is used for thinking and eating philos- 
ophers, and wantfork is used when a phi- 
losopher waits for a fork. In the global 
VAR section for the five philosophers, 
five PCBs are allocated in array Guests. 

TYPE WKSPACE defines working 
space for each process. TYPE 
FORKCTRL controls a fork, identifying 
the philosopher who is using and waiting 
for this fork. An array of five 
FORKCTRLs is allocated for five forks 


as Utensils in the VAR section. Addition- 
al variables identify the currently execut- 
ing process, support the tick timer 
interrupt handler, and record success and 
the number of reaching and excused 
philosophers. 

After the variable declarations come 
the interface procedures whose names we 
have already seen. Get/D simply returns 
the executing process’ identifier. Think 
sets the active (calling) process’ waittime 
to the number of seconds times 18. The 
DOS tick timer interrupts execution 
roughly every 1/18 second, so we set 
waittime to seconds times 18 and the 
state to thinking; the timer interrupt 
handler will take care of the rest. 

Finally, we see a call to SWITCH, the 
procedure that will suspend execution of 
the current process and select another 
philosopher to run. When execution re- 
turns to the end of Think following the 
SWITCH call, the think time will be 
elapsed and the state of this philosopher 
will be ready; SWITCH only returns to a 
ready philosopher. While this philosopher 
thinks, others will execute (if they are 
ready). 


G This definition module "table.def" defines. the dinner table 
contents & actions for the dining philosgshers in "philos.mod" 


Procedure GetFork is more complicat- 
ed. It determines the identifying number 
of the requested Left or Right fork for 
the calling philosopher and whether that 
fork is in use. If not, the fork is assigned 
to the active philosopher and GetFork re- 
turns. Otherwise, the fork is tagged as 
wanted by this philosopher, the PCB 
state is set to reaching for this fork, the 
global count of blocked processes is in- 
cremented, and SWITCH is called to 
find a ready process to run. If SWITCH 
ever returns, this philosopher will be in 
possession of the requested fork and will 
be ready to go. 

Procedure Eat is similar to Think ex- 
cept that the state of the process is set to 
eating. Also, Eat decreases the cookie re- 
mainder count after eating. Procedure 
GiveFork returns a fork previously ob- 
tained by GetFork. If a neighboring phi- 
losopher is waiting for the fork, then 
GiveFork gives that philosopher the fork; 
the fork’s waiting philosopher is made its 
current user and his state is set to ready. 
Thus we see the removal of the block es- 
tablished in GetFork. Also, the global 
count of blocked processes is decrement- 
ed. If the fork is not in demand, it is 


module Philos. Dale Parson, Spring semester, 1987 *) 


DEFINITION MODULE Table ; 
EXPORT QUALIFIED 


ForkName, (* this is type, remainder are procedures *) 
GetID, Think, GetFork, Eat, GiveFork, LeftOver, 
ExcuseMe, SetTable, EatMeal ; 


TYPE 


ForkName = (Left, Right) ; (* used when requesting a fork *) 


Philosopher 2 
Philosopher 3 
Philosopher 4 
Philosopher 
Philosopner 1 


Philosopher 2 
Philosopher 2 
Philosopher 2 
Philosopher 2 


NOTE: 6 PAGES 


Philosopher 
Philosopher 
Philosopher 
Philosgpher 
Philosopher 
Philosogpher 
Philosopher 
Philosopher 


ee en ee ed 


will think for 1 seconds. 
will think for 1 seconds. 
will think for 2 seconds. 
will think for 1 seconds. 
will think for 4 seconds. 


has completed thinking. 
reaching for left fork. 
has obtained left fork. 
will pause for 3 seconds. 


OF OUTPUT DELETED 


has obtained left fork. 
will pause for 4 seconds. 
has completed pausing. 
reaching for right fork. 
has obtained right fork. 
will eat 2 cookies. 

has completed eating. 
has completed his meal. 


Meal consumed. 


Listing 3. 


PROCEDURE GetID() : INTEGER ; (* returns currently executing philosopher's id *) 


PROCEDURE Think (duration : INTHGER) ; (* think for duration seconds *) 
PROCEDURE GetFork(forkid : ForkName) ; (* possibly blocking request *) 


PROCEDURE Bat (amount : INTHGER) ; (* how many cookies - seconds - to eat *) 


PROCEDURE GiveFork(forkid : ForkName); (* put fork back on table *) 

(* reports number of cookies still on plate *) 
(* used when finished eating - leave table *) 
PROCEDURE SetTable(Eater : PROC) ; (* seat philosophers, set table *) 


PROCEDURE LeftOver() : INTEGER 
PROCEDURE ExcuseMe ; 


PROCEDURE EatMeal() : BOOLEAN ; (* true if meal finished - no deadlock *) 


END Table. 


Listing 4. 
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marked as free. In either case, GiveFork 
always returns to its caller without call- 


ing SWITCH. 


LeftOver returns the cookie remainder 
value from the PCB. ExcuseMe sets the 


state to excused, increments the global 
finished count, and SWITCHes to an- 
other process. Control will never be re- 


turned to this process by SWITCH since 
once a philosopher is excused he will nev- 


er be ready to eat again. 


LeftOver completes the list of service 
routines called by the philosophers. Set- 


Table is used to initialize the scene. A 


call to NEWPROCESS for each PCB of 
array Guests creates a resumable process 
for each of the philosophers. This action 


initializes the context field in the PCB. 
The context field saves information on 


where to resume execution of the process 


and what its private data (local varia- 
bles) values were when it was last 
executing. 


Parameter Eater corresponds to proce- 
dure Philosopher in the call to SetTable, 
and array Chairs is used to supply mem- 


ory work space for the processes. After 
initializing the philosopher processes, 
SetTable does the same for the tick in- 


terrupt handler. Finally, the tick handler 


is resumed via TRANSFER so that it 


can execute its initialization code and re- 
turn immediately. SetTable then returns 


as well. 
EatMeal kicks off the meal. It ran- 
domly picks a starting philosopher and 


starts his execution using TRANSFER. 
Eventually, when all philosophers are ei- 
ther excused or blocked, SWITCH will: 
TRANSFER back to EatMeal (variable 
Original records the resume point of this 


original process) and EatMeal will re- 
turn the success value of the meal. 


Initialization, interrupts, switcher 
Before looking at the process switcher 


and tick interrupt handler, examine the 


initialization code for MODULE Table 
at the end of Listing 5. All five philos- 


ophers: states are set to ready, and they 


are allocated 25 cookies. The five forks 
are marked as not in use. No processes 
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are blocked or excused yet, and we as- 
sume the meal will be successful (for 
now). - 

Above the initialization code is the 
tick interrupt handler TickCatch. DOS 
interrupts program execution with inter- 
rupt 1C (hexadecimal) every 1/18 sec- 
ond. This is the timer tick interrupt. The 
default DOS handler for this interrupt 
merely returns from the interrupt with- 
out performing any action. TickCatch 
sets the stage to catch this interrupt by 
exiting via JOTRANSFER, both when 
TickCatch is called (via TRANSFER 
from SetTable) for initialization and 
after handling each interrupt. The con- 
text of the interrupted process is saved in 
global variable TickSuspend whenever 
TickCatch services an interrupt. 

TickCatch’s work consists of examin- 
ing all five PCBs for thinking and eating 
philosopher states. Any philosopher in 
such a state gets his wait time reduced 
by one tick; when the wait time is ex- 
hausted, TickCatch resets that philos- 
opher’s state to ready. TickCatch then 
resumes the interrupted process. 

The code for Procedure SWITCH, the 
heart of MODULE Table, will pull the 
logic of the rest of the module together. 
Skip over the definition of nested Proce- 
dure DEADLOCK. Remember from the 
service procedures already examined that 
SWITCH is called whenever the current- 
ly executing philosopher process wishes 
to surrender the CPU, either because it 
is excused, thinking, eating, or waiting 
for a fork. SWITCH must find another 
process to run. 

First, SWITCH checks the blocked 
count to determine the number of reach- 
ing philosophers. If all five are reaching, 
the SWITCH reports the deadlock con- 
dition, sets the success flag to FALSE, 
and resumes execution of the Original 
main process at the bottom of MODULE 
Philos. Nothing more can be done. Like- 
wise, if all five are finished, SWITCH 
resumes the Original process, this time 
with a TRUE success flag. 

If neither of these conditions holds, 
then we have at least one ready philos- 
opher or at least one eating or thinking 
philosopher we must wait for. SWITCH 
goes into a loop of examining all five 
candidate philosophers until one who is 
ready is found. If none are initially ready 


but one or more are eating or thinking, 
SWITCH will patiently loop until the 
eating or thinking process has its wait 
time zeroed and its state set to ready by 
TickCatch. 

Once a candidate is selected, 
SWITCH determines if it is the process 
that called SWITCH (possible for an 
eating or thinking caller). If so, 
SWITCH merely returns to the calling 
philosopher. Otherwise, SWITCH saves 
the context of the calling process in its 
PCB and TRANSFERS to the current 
execution point of the candidate process 
by way of its PCB context. SWITCH 
will be called again when that process is 
ready to surrender the CPU. 


Varieties of schedulers 

The context switcher just discussed im- 
plements a scheduling strategy known as 
nonpreemptive first-in-first-out schedul- 
ing. It is nonpreemptive because the 
CPU is never taken from a process until 
it volunteers to surrender it. It is first-in- 
first-out because no special consideration 
is given to any process when a candidate 
is selected by SWITCH; the next process 
that is ready to run gets the CPU. 

A preemptive scheduler takes advan- 
tage of interrupts to take the CPU away 
from a process without the process’ ex- 
plicit request. One such strategy is 
round-robin. This method allocates a 
maximum time for CPU usage (the time 
slice) by the process. A timer interrupt 
such as the timer tick interrupts the pro- 
cess if it does not perform a blocking ser- 
vice request during the time slice. The 
interrupt handler calls SWITCH to pick 
a different candidate process to run. 

Other preemptive strategies exist. As 
you might expect, their code is more 
complex than the nonpreemptive one im- 
plemented in the program discussed here. 

Additionally, implementing these 
strategies on MS-DOS presents a funda- 
mental problem. If the interrupted pro- 
cess was in the midst of doing I/O by 
way of a system call to DOS when con- 
trol is transferred to a different process, 
that second process may also request I/O 
from DOS. The result is that DOS gets 
confused and performs incorrectly. 

This problem is a result of MS-DOS 


being nonreentrant. That is, it cannot be 
reentered by a second process while per- 
forming service for the first process. 
Since our simple tick handler does not 
call DOS, this problem is avoided. 


Concurrency on the rise 

As you have probably already decided, 
concurrent programs are not as straight- 
forward to read as good old sequential 
code. In the example presented here, it is 
impossible to understand how the service 
procedures direct flow of control until 
SWITCH is examined, yet SWITCH 
makes no sense unless we look at how the 
service procedures set up for it first. The 
interdependencies of concurrently execut- 


ing processes make them far more diffi- 
cult to analyze than even mutually 
recursive sequential procedures. 

Despite the difficulties, concurrent 
programming is on the increase, largely 
due tothe availability of multiple proces- 
sor systems made possible by inexpensive 
microprocessors. When fitted with a suit- 
able scheduler, Modula-2 can be used to 
support concurrent programming, and 
the difficulties, limitations, and vast pos- 
sibilities of this programming technique 
can be explored. |: | 
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(* This implementation module table.mod implements the concurrent 
dinner table multiple-philospher-process control for the dining 
philosophers of main module Philos in philos. ned. 

Dale Parson, Spring semester, 1987 


IMPLEMENTATION MODULE Table ; 

FROM SYSTEM IMPORT ADR, BYTE, PROCESS, NEWPROCESS, 
FROM InOut IMPORT WriteLn, WriteInt, WriteString ; 
FROM Random IMPORT Randanint ; 

CONST 


TRANSFER, ILOTRANSFER ; 


guestsize = 5 ; (* number of philosophers and forks *) 
memsize = 5¥@0 ; (* memory for processes *) 
freefork = -1 ; (* used to mark fork as not in use *) 
mealsize = 25 ; (* how many cookies to eat per philosopher *) 
a TicksPerSecond = 18 ; (* tick interrupts every 1/18 second *) 
TYPE 5 ee 
modes = (ready, thinking, reaching, eating, excused) ; 
PCB = RECORD (* Philosopher Control Block *) 
context : PROCESS ; 
state : modes ; 
remainder : INTHGER ; (* how many cookies left *) 
waittime : INTEGER ; (* ticks to wait when thinking or eating *) 
a wantfork : INTEGER (* fork this philosopher is waiting for *) 
.WKSPACE = ARRAY [1..memsize] OF BYTE ; (* workspace for philosopher *) 
FORKCTRL = RECORD (* fork control info. *) 
= using, waiting : INTHGER (* who is using and waiting on fork *) 


VAR 
Guests : ARRAY [U..gquestsize-lj OF PCB ; 
Chairs : ARRAY [@..guestsize-l1] OF WKSPACE ; 
Utensils : ARRAY [%..guestsize-1] OF FORKCTRL ; 
Active : INTEGER ; (* currently active philosopher *) ' 
Original, TickHandler, TickSuspend : PROCESS ; 


Listing 5. (Continued on following page) 
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(* main entry process, tick interrupt handler, interrupted process 3) 
TickSpace : WKSPACE ; (* memory for tick-handling process *) 

blocked, finished : CARDINAL ; (* number currently reaching, excused *) 
success : BOOLEAN ; (* true if meal completed with no deadlock *) 

temp : CARDINAL ; (* used in initialization code at bottom *) 


(* SERGE PROCEDURES EXPORTED IN THE Table DEFINITION MODULE we) 
PROCEDURE GetID() : INTEGER ; (* returns currently executing philosopher's id *) 
BEGIN 
RETURN Active 
END GetID ; 
PROCEDURE Think(duration : INTEGER) ; (* think for duration seconds *) 
BEGIN 
Guests[Active].waittime := duration * TicksPerSecond ; 
(* each tick = 1/18 second, think duration seconds *) 
GuestslActive].state := thinking ; 
SWITCH (* perform context switch *) 
END Think ; 
PROCEDURE GetFork(forkid : ForkName) ; (* possibly blocking request *) 
VAR forknum : INTEGER ; 
BEGIN 


forknum := (Active + INTHGER(ORD(forkid))) MOD guestsize ; 
(* the index into Utensils for this philosopher and fork x) 
IF Utensils[forknum].using = freefork THEN (* get it immediately *) 
Utensils[ forknum].using := Active 
ELSE (* post a request for it and block until available *) 
Utensils[ forknum].waiting := Active ; 
Guests[Active].state := reaching ; (* change state *) 
GuestsLActive].wantfork := forknum ; 
INC(blocked) ; (* keep track of number reaching *) 
SWITCH (* someone else runs while I wait *) 
END 
(* at this point I have the fork *) 
END GetFork ; 


PROCEDURE Eat (amount : INTEGER) ; (* how many cookies - seconds - to eat *) 


BEGIN 
GuestslActive].waittime := amount * TicksPerSecond ; 
(* each tick = 1/18 second, eat one cookie per second *) 
Guests[Active].state := eating ; 
SWITCH ; 
DEC(Guests[Active].remainder, amount ) 
END Eat ; 
PROCEDURE GiveFork(forkid : ForkName); (* put fork back on table *) 
VAR forknum, hungry : INTEGER ; 
BEGIN => 


forknum := (Active + INTHGER(ORD(forkid))) MOD guestsize 7 
(* the index into Utensils for this philosopher & fork *) 
IF Utensils| forknum].waiting # freefork THEN 
(* someone else is waiting, let them have it *) 
hungry := Utensils[forknum].waiting ; 
Utensils[ forknum].waiting := freefork 7 
Utensils[forknum].using := hungry ; 
(* fork is changed, now change the philosopher *) 
GuestsLhungry|.state := ready ; 
DEC(blocked) (* one less is reaching *) 
(* don't actually switch to him *) 
ELSE 
Utensils[ forknum].using := freefork (* not in use *) 
END 
END GiveFork ; 


Listing 5. (Continued on a following page) 


42 COMPUTER LANGUAGE @ SEPTEMBER 1987 


SAS Institute Inc. 
Announces 


Lattice C Compilers for Your IBM Mainframe 


Two years ago... 

SAS Institute launched an effort to develop a 
subset of the SAS® Software System for the 
IBM Personal Computer. After careful study, 
we agreed that C was the programming 
language of choice. And that the 

Lattice® C compiler offered the quality, 
speed, and efficiency we needed. - 


One year ago... 

Development had progressed so well that we 
expanded our efforts to include the entire 
SAS System on a PC, written in C. And to 
insure that the language, syntax, and 
commands would be identical across all 
operating systems, we decided that all future 
versions of the SAS System—regardless of 
hardware—would be derived from the same 
source code written in C. That meant that 
we needed a C compiler for IBM 370 main- 
frames. And it had to be good, since all our 
software products would depend on it. 

So we approached Lattice, Inc. and asked 
if we could implement a version of the 
Lattice C compiler for IBM mainframes. 
With Lattice, Inc.’s agreement, development 
began and progressed rapidly. 


Today... 

Our efforts are complete—we have a first- 
rate IBM 370 C compiler. And we are 
pleased to offer this development tool to 
you. Now you can write in a single 

language that is source code compatible with 
your IBM mainframe and your IBM PC. We 
have faithfully implemented not only the 


-language, but also the supporting library and 


environment. 
Features of the Lattice C compiler for 
the 370 include: 


@ Generation of reentrant object code. 
Reentrancy allows many users to share 
the same code. Reentrancy is not an 
easy feature to achieve on the 370, 
especially if you use non-constant 
external variables, but we did it. 


@ Optimization of the generated code. We 


know the 370 instruction set and the 
various 370 operating environments. We 
have over 100 staff years of assembler 
language systems experience on our 
development team. 

Generated code executable in both 
24-bit and 31-bit addressing modes. You 
can run compiled programs above the 
16 megabyte line in MVS/XA. 

@ Generated code identical for OS and 
CMS operating systems. You can move 
modules between MVS and CMS 
without even recompiling. 

@ Complete libraries. We have 
implemented all the library routines 
described by Kernighan and Ritchie (the 
informal C standard), and all the library 


SAS is the registered trademark of SAS Institute Inc., Cary, NC, USA. Lattice is the registered trademark of Lattice, Inc. PLINK86 and PLIB86 are trademarks of Phoenix Software Associates Ltd. 


routines supported by Lattice (except 
operating system dependent routines), 
plus extensions for dealing with 370 
operating environments directly. 
Especially significant is our 
byte-addressable Unix®-style I/O 
access method. 

B Built-in functions. Many of the 
traditional string handling functions are 
available as built-in functions, generating 
in-line machine code rather than function 
calls. Your call to move a string can result 
in just one MVC instruction rather than a 
function call and a loop. 


In addition to mainframe software 
development, you can also use our new 
cross-compiler to develop PC software on 
your IBM mainframe. With our cross- 
compiler, you can compile Lattice C 
programs on your mainframe and generate 
object code ready to download to your PC. 

With the cross-compiler, we also offer 
PLINK86™ and PLIB86™ by Phoenix 
Software Associates Ltd. The Phoenix link- 
editor and library management facility can 
bind several compiled programs on the 
mainframe and download immediately 
executable modules to your PC. 


Tomorrow... 

We believe that the C language offers the 
SAS System the path to true portability and 
maintainability. And we believe that other 
companies will make similar strategic 
decisions about C. Already, C is taught in 
most college computer science curriculums, 
and is replacing older languages in many. 
And almost every computer introduced to 
the market now has a C compiler. 


C, the language of 
choice... 


C supports structured programming with 
superior control features for conditionals, 
iteration, and case selection. C is good for 
data structures, with its elegant implemen- 
tation of structures and pointers. C is 
conducive to portable coding. It is simple 
to adjust for the size differences of data 
elements on different machines. 


Continuous support... 

At SAS Institute, we support all our 
products. You license them annually; we 
support them continuously. You get updates 
at no additional charge. We have a 
continuing commitment to make our 
compiler better and better. We have the 
ultimate incentive—all our software 
products depend on it. 


For more information... 
Complete and mail the coupon today. 
Because we've got the development tool for 
your tomorrow. 


® 


SAS Institute Inc. 

SAS Circle, Box 8000 

Cary, NC 27511-8000 

Telephone (919) 467-8000 x 7000 


I want to learn more about: 


O the C compiler for MVS software developers 
O the C tompiler for CMS software developers 
O the cross-compiler with PLINK86 and PLIB86 


today...so I'll be ready for tomorrow. 


Please complete or attach your business card. 
Name 
Title 


Company 
Address 


City, 2s ee eee State 
Telephone 


Mail to: SAS. Institute Inc., Attn: CC, SAS Circle, Box 8000, Cary, NC, USA. 
27511-8000. Telephone (919) 467-8000, x 7000 


UNIX is the trademark of AT&T. Copyright © 1985 by SAS Institute Inc. Printed in the USA. 
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PROCEDURE LeftOver() : INTEGER ; (* reports number of cookies still on plate *) 
BEGIN 
RETURN Guests[Active].remainder 
END LeftOver ; 
PROCEDURE ExcuseMe ; (* used when finished eating - leave table *) 
BEGIN 


Guests[Active].state := excused 7 
INC(finished) ; (* maintain count to determine end of neal = 
SWITCH 


END ExcuseMe ; 


PROCEDURE SetTable(Eater : PROC) ; (* seat philosophers, set table *) 
VAR philonum : CARDINAL ; 
BEGIN 
FOR philonum := 9 TO guestsize-1 BY 1 DO (* set up the processes *) 
NEWPROCESS (Eater, ADR(Chairs[philonum]), memsize, 
Guests[philonum].context) 
END ; 
(* ereate process for interrupt handler *) 
NEWPROCESS (TickCatch, ADR(TickSpace),. memsize, TickHandler); 
(* go initialize tick handler *) 
TRANSFER (TickSuspend, TickHandler) 
END SetTable ; 


PROCEDURE EatMeal() : BOOLEAN ; (* true if meal finished - no deadlock *) 
BEGIN 
Active := RandamInt(guestsize) ; (* pick random philosopher to start *) 
TRANSFER (Original, Guests[Active].context) ; 
(* we get back here when the dinner is over *) 


Writebn ; 
RETURN success (* true unless deadlock *) 
END EatMeal ; 
(Hidden ik THE PROCESS COROUTINE SWITCHER HKEKKEKEEE ) 


PROCEDURE SWITCH ; 
VAR 
candidate, oldster : INTHGER ; 


PROCEDURE DEADLOCK ; (* report a deadlock *) 
BEGIN 
WriteLn ; WriteLn ; 
WriteString( ‘DEADLOCK Detected!'); Writeln ; Writebn ; 
FOR candidate := @ TO guestsize-1 BY 1 DO 
WITH Guests[ candidate] Do 
WriteString('Philosopher '); 
WriteInt (candidate, 8); WriteString(' reaching for '); 
WriteString('fork '); WriteInt(wantfork, 9); 
WriteString(', remaining-cookies on plate = '); 
WritelInt(remainder,@); Writeln ; Writeln 
END 
END 
END DEADLOCK ; 


BEGIN (* SWITCH *) 
IF blocked = guestsize THEN (* they all are blocked, deadlock! *) 
DEADLOCK ; (* report deadlock *) 
success := FALSE ; 
TRANSFER(GuestsLActive].context,Original) 
(* we won't come back *) 
ELSIF finished = guestsize THEN (* all done, go back and exit *) 
TRANSFER (Guests[Active|.context,Original) 
END ; 


(8 cs we get here we have a ready, eating, and/or thinking 
philosopher(s). Wait for one. *) 


candidate := (Active + 1) MOD guestsize ; 

WHILE Guests[ candidate].state # ready DO 
Candidate := (candidate + 1) MOD guestsize 

END ; 


Listing 5. (Continued on a following page) 
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Clarify and document your source listing and get 
an “organization chart” of your program’s structure 


with two NEW utilities from Aldebaran Laboratories, for C, BASIC, 
Pascal, d(BASE® FORTRAN and Modula-2 programmers, se 


“Occasionally, a utility 
comes along that makes a 
programmer’s life much 
easier. SOURCE PRINT 
is such a program. 

It contributes to the 


programmer’s job by 
organizing code into a 
legible format and by 
helping to organize the 
documentation and 
debugging process.” 


— PC Magazine 
Sept. 16, 1986 


Source Print and Tree Dia- 
grammer both have easy-to-use 
menus with point-and-shoot file 
selection, and let you search for 
files containing a given string. 
For IBM PC and compatibles 
with 256K. 

Join thousands of program- 
mers who are working more 
efficiently using Source Print 
and Tree Diagrammer. Order 
these indispensable tools today. 
We ship immediately, and 
there’s no risk with our 60-day 
money-back guarantee. Order 
both and save. Only $155.00. 


800-257-5773 dept. 49 


In California: 


800-25 7-5 774 Dept. 49 


MasterCard, VISA, American 
Express, COD. Add $5 for 
shipping/handling. 


or see your local dealer! 


Source Print and Tree Diagrammer are 
trademarks of Aldebaran Labs. dBASE is 
a trademark of Ashton Tate. Prices subject 
to change without notice. 


) 
Now W RA 
with FORT 


HEN X = 5 
ILE K <= 1000: TB(K) = 0: K = K + X: WEND 


Source Print” 


180 GOSUB 2000 


organizes your source code, simpli- 
fies debugging, and makes documen- 3B BO ae COIS Se 
tation a snap! It lists one or more TINE UTpC NDR) 20 TMM x = 5 
source files with informative page L ‘ete =o 
headings and op- 
tional line numbers, source ( 
while offering wale (iar ¢ nres && ares{iar][0] == c) 
. if ((d = ares[iar][1]) == 0) 
invaluable features: Lee 

The Index ro = *p) 
(Cross-Reference 
list) saves you time 
by showing exactly Cc 
winlotes Teta lesare me ERE ES BBE Rane 
used and where functions, pro- $9 7:90 341384 $4l23ed alae Sal2366 
cedures, and routines are called. CS ee retire 
Locations where new 
values may be assigned to 
variables are shown, making it easy to track down that 
mysterious value change. 

Structure Outlining solves the problem of hard-to- 
see nested control structures by automatically drawing 
lines around them. 

Automatic Indentation of source code and listings 
reduces your editing time and ensures indentation accuracy. 
Plus... Source Print generates a table of contents 

“! listing functions and procedures. Keywords can be printed 
Lae in boldface on most printers. Multi-statement BASIC lines 
bute can be split for readability. Functions and procedures can 
be drawn by name from one or more source files to forma 
new file. 


Tree Diagrammer” EPR Eas 


shows your program’s overall organization ata 
glance. Ordinary program listings merely display 
functions, procedures, and subroutines sequen- 
tially, but do notdisplay the relationships be- 
tween these routines. Our revolutionary new 
Tree Diagrammer automatically creates an 
“organization chart” of your program showing the 
hierarchy of calls to functions, procedures, and 
subroutines. Recursive calls are indicated and E 
designated comments in the source code ENGST 
will appear on the chart. 

Tree Diagrammer helps you organize your 
program more logically. And you’ll be amazed at 


how easy it is to debug when you $7 700 


see how your routines interact. 


Before 


CR=dGiy 2 
NEXT INDX 


Wed 12-31-86 07:22:03 INDEX (Cross Ref) 
all identifiers 


19.825 19=826 


inrecord 4.191 9=396 
21. 22.922 22.953 23=978 


Index 


SALES.C 


‘SALES.C 54 


Aldebaran Laboratories 3339 Vincent Rd. Pleasant Hill,CA 94523 415-930-8966 


YES | Rush IME D Source Print @ $97. Tree Diagrammer @ $77. Siig oats 
Both $155. Ship/Handling $5. For CA add 6% tax —___ Total 

Name 

Company 

Address 

Gilyss 2 Soe Se Ale 

(1) Check enclosed MasterCard American Express 

Garde = iets a ee ee ep aDale 

Sipria terre a hones 
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(* candidate is the next one to go *) 
IF candidate = Active THEN 
(* no other ready, return after exhausting wait time *) 


RETURN 
ELSE 
oldster := Active ; 
Active := candidate ; 
WriteLn ; (* used to make process’ printout more legible *) 
TRANSFER (GuestsLoldster ].context, Guests[Active].context) 
END 
END SWITCH ; 
(FRR RRKKEEK TICK INTERRUPT HANDLER RRKKKKEKKE ) 


PROCEDURE TickCatch ; (* the MS-DOS 1/18 second tick interrupt handler *) 
(* no priority needed - it's ok to let any interrupts come in 
since none of them interfere with the PCB table *) 
VAR candidate : INTEGER ; 
BEGIN = 
LOOP 
LOTRANSFER(TickHandler,TickSuspend, 1CH) ; 
(* when next tick interrupt comes in resume here *) 
FOR candidate := 9 TO guestsize-1 BY 1 DO 
WITH GuestsLcandidate] DO 
IF (state = thinking) OR (state = eating) THEN 
DEC(waittime) ; 
IF waittime = @ THEN 
state := ready 


END 
END 
END 
END 

END (* outer loop *) 
END TickCatch ; 
(BERRRERKEK MAIN ENDL Robe hoe Ae ec Or N CLOR DEE Bee) 
(* Do as much initialization as possible here, remainder in SetTable =) 


BEGIN 
FOR temp := @ TO guestsize-1 BY 1 DO (* initialize philosophers and guests *) 
WITH Guests[temp] Do 
state := ready ; (* context set in SetTable *) 
remainder := mealsize (* must eat whole meal *) 
(* other fields used only during pertinent states *) 
END ; 
WITH Utensils temp] DO 
using := freefork ; 
waiting := freefork (* all forks are initially free *) 


blocked := 9 ; (* none reaching or excused yet *) 
finished := 9 ; 
success := TRUE (* no deadlock unless detected *) 
END ; 
END Table. 


Listing 5. (Continued from a preceding page) 
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FREE! Turbo C? cies 


or 
QuickC" 
(with C Business Library or C Starter Package, limited time offer.) (Microsoft) 


FREE — even if you ALREADY OWN Turbo-C or QuickC — see special offer. * 


POWER WINDOWS ™ 


MOST POWERFUL YET 
POP-UP WINDOWS FOR 
Menus/Overlays 
Help Screens 
Messages/Alarms 
ZAP ON/OFF SCREEN 
FILE-WINDOW MANAGEMENT 
AUTOMATIC 
Horizontal & Vertical Scrolling 
Word Wrap & Line Insertion 
Cursor/Attributes/Borders 
The most powertul, flexible and easy 
to use windowing package available! 
Many types of menus. Highlighting. 
Move data between files, keyboard, 
program and windows. Status lines. 
Change size/location/overlapping. 
Move/add/delete/cascade windows. 
Full source code. No royalties. 


3 disks $129.95 


C FUNCTION LIBRARY 


BEST YOU CAN GET 
400 FUNCTIONS 
FULLY TESTED 
SUPERB DOCUMENTATION 
BETTER FUNCTIONS 
Most complete screen handling plus 
graphics; cursor/keyboard/data 
entry; 72 string functions with word 
wrap; status and control; utility/DOS 
BlOS/time/date functions; printer 
control & more. Special functions. 
Functions you NEED but don't have! 
Full source code. No royalties. 
4 disks $129.95 


C BUSINESS LIBRARY 


INCLUDES C FUNCTION LIBRARY, POWER 
WINDOWS, SUPERFONTS FOR C, B-TREE 


LIBRARY, ISAM 


ALL for $299.95 


(A $440 VALUE) 


COMPATIBILITY: /BM PC/XT/AT & compatibles. Microsoft C, Lattice, Mark 
Williams, Aztec, Cl 86, Datalight, Turbo C, any ANSI or full K&R compiler. 


DEPTH: Data Entry/Power Windows (the most powerful professional windowing 
package) and C Function Library (the most extensive and useful library 
available) plus the speed, power and flexibility of the B-TREE and ISAM library. 
All work together to make your project go FAST! 


NO MATTER WHAT ELSE YOU HAVE, GET THESE... 


SPECIAL OFFER 


If you already own Turbo C 
or QuickC we will credit 
up to the full purchase 
price of your QuickC or 
Turbo C on purchase of 

C Business Library or 

C Starter Package. 

Free Turbo C or free 
QuickC are limited time 
offers subject to termina- 
tion without notice. 


“We save man-months...make 
that man-years...on our projects 
by using Entelekon libraries.” 
J.M. Scroggins, 
Systems Consultant 


DON’T PAY MORE AND GET LESS! 


SUPERFONTS FOR C 


SUPER SIZE CHARACTERS 
Monochrome adapter 
Color/graphics adapter 
8 FONT LIBRARIES 
Dramatic high impact screens/titles/ 

messages. Use with or without 
windows. Great for projection TV. 
Create own font & image libraries or 
use ours. Use with windows for 
special effects or animation. Full 
source code. No royalties. 

Font and Function Library ...$49.95 


B-TREE LIBRARY 


& ISAM DRIVER 


POWERFUL DATA MANAGER 
Fixed/Variable length records 


FAST! EASY TO USE! 
16.7 MILLION RECORDS/FILE 

16.7 MILLION KEYS/FILE 
Fast B-tree indices. Add/remove 
keys Find first/last/next/any key. Find 
keys by Boolean selection. Read/ 
write/delete or add records to file. 
Full source. No royalties ... .$129.95 


C STARTER PACKAGE 


INCLUDES C FUNCTION LIBRARY, POWER 
WINDOWS, SUPERFONTS FOR C 


ORDER FORM PRICE QTY. TOTAL 

C Function Library 129.95 | 
Power Windows 129.95 

Super Fonts for-G- 49.95 | 
B-tree & lsam 129.95 

C Starter Package 199.95 | 
C Business Library 299.95 
TEXAS RES. ADD 7.25% TAX __ Shipping $5.00 UPS Ground TOTAL 

| PAYMENT: VISA MC CHECK | 
CARD # EXPIR DATE. 

NAME | 
ADDRESS 

CITY STATE | 
ZIP PHONE 


THE C POWER FAMILY ... YOUR COMPLETE SOURCE FOR C 


Entelekon 


SINCE 1982 


12118 Kimberley, Houston, TX 77024 713-468-4412 VISA-MASTERCARD-CHECK-COD 
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Programmer's Paradise Gives You Superb Selection, 
Personal Service and Unbeatable Prices! 


Welcome to Paradise. The MS/PC-DOS and XENIX software source that caters to your programming needs. 
Discover the Many Advantages of Paradise... 


e Huge inventory, immediate shipment 
e Knowledgeable sales staff 


e Special orders 
e 30-day money-back guarantee* 


e Lowest price guaranteed 
e Latest versions 


We'll Match Any 
Nationally Advertised Price 


OURS 
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ADVANTAGE GRAPHICS 250 225  ASMTREE 395 339 CODE SIFTER 119. 89. == QUICK PAK 6959 
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GRAPHIC 350-285 XTRIEVE 245° 185 THE PROFILER 125 89 TRUE BASIC 150 105 
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Turbo Pascal 
"Assembly 


urbo Pascal is a 
supple lan- 
guage. Still, 
some problems 


require an assembly language solution. 
These problems fall into two broad cate- 
gories: speed (for example, disk I/O) and 
direct access to the system (for example, 
get the system time). 

Often we want to combine the flexibil- 
ity of Turbo Pascal with the power of as- 
sembly language, which can be done by 
executing short assembly language rou- 
tines within a Turbo Pascal program. In- 
formation can also be passed between the 
Pascal and assembly language programs. 

Unlike Microsoft languages, Borland’s 
Turbo Pascal does not create OBJ files 
that can be linked with modules created 
by other compilers or assemblers. But 
Turbo Pascal does provide other ways to 
integrate assembly language code into a 
Pascal program. Some of these methods 
are discussed in this article. 


MSDOS and INTR procedures 
Turbo Pascal’s MS'DOS procedure is 
used to execute interrupt 21h, a DOS 
call. Interrupt 21h provides a collection 
of basic services that can be used to dis- 
play characters, read the keyboard, open 
disk files, and access the machine in oth- 
er ways. Interrupt 21h is the domain of 
assembly language programmers, but 
Turbo Pascal’s MSDOS procedure makes 
interrupt 21h available to Turbo Pascal 
programmers. 

In implementing the MSDOS proce- 
dure, a Turbo Pascal record type and 
variable are used: 


type reg = record 
ax,bx,cx,dx,bp,si,di,ds,es,flags: 


and 
back 


By Michael Bertrand 


integer; 
end; 


var registers: reg; 


The ax, bx, etc., are record fields of 
type integer that are given the same 
names as some of the 8088 registers. As- 
signments are made to these Turbo Pas- 
cal fields, and then MSDOS is executed. 
Values returned by the DOS call in reg- 
isters are recovered by Turbo Pascal in 
variables of the same name: 


registers.ax: = $0200; i =2, AL=O} 


msdosl(registers) INT 21h} 
Recall that the 8088’s AX register is 
16 bits wide—the same as Turbo Pascal 
integers. AX can be broken into a high 
byte (AH) and a low byte (AL). Simi- 
larly, BX = (BH, BL), CX = (CH, 
CL), and DX = (DH, DL). The value 


in AH always signifies the DOS service 
being called. In Turbo Pascal, a dollar 
sign ($) prefix before a numerical con- 
stant means the number is in hexadeci- 
mal notation (base 16). 

For example, we obtain the system 
time as follows in assembler: 


mov ah,2Ch 
int 21h 


;get time service 


:DOS call 


The time is returned in the following 
registers: 


CH=hour (0-23) 
CL=minute (0-59) 
DH=second (0-59) 
DlL=hundredths/sec (0-99) 


There is no built-in way to obtain the 
system time in Turbo Pascal, but we can 
get the time by executing the DOS call 
in Listing 1. 


procedure get_time(var hour,minute,second,hundredth: byte); 


type regs = record 


ax, bx, cx,dx,bp,ai,si,ds,es,flags: integer 


end; 
var registers: regs; 
begin 
with registers do 
begin 
ax := S2CUO; 
msdos(registers) ; 
hour := hi(cx); 
minute := lo(cx); 
second := hi(dx); 
hundredth := lo(dx) 
end {with} 
end; {procedure} 


Listing 1. 


{AH = 2Ch; AL = 00h} 
{INT 21h} 
{CH} 
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The Turbo Pascal JN7TR procedure is 
used to execute any interrupt—MSDOS 
is a special case for interrupt 21h. The 
REGISTERS record is used with JNTR, 
just as with MSDOS, except that the in- 
terrupt number must be given: 


registers.ax :=$0100; ee ] ee 
registers.cx :=$0607; Chl=6'Gl=7} 
intr($10,registers); {INT 10h} 


Any of the BIOS services can be 
called: video services (INT 10h), disk 
services (INT 13h), keyboard services 
(INT 16h), and so on. 


For example, we can print the screen 
from within an assembly language pro- 
gram by executing an interrupt 5h (this 
interrupt is invoked when <SHIFT> 
<PrtSc> is pressed at the keyboard): 


int 5h — ;print the screen 


The same thing is done within a Turbo 
Pascal program by: 


intr($05,registers); 


In the next example, we invoke one of 
the video services at interrupt 10h to 


Value assignments for CH and CL 


Full 
block ecooccve 
cursor: weceoece 


eeoeeoee 


SON Gis Got) 7S) 


Lower two 
scan 
lines 


PNIGS CaS COU ND oy 


Middle 
four scan 
lines 


NQOOoahwoOnN—-oO 


Figure 1. 
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hi_scan_line (CH) = O 


lo_scan_line (CL) = 7 


v 


hi_scan_line (CH) = 6 
lo_scan_line (CL) = 7 


hi_scan_line (CH) = 2 


lo_scan_line (CL) = 5 


change the cursor appearance. This is 
done in assembler as follows: 


mov ah,Olh ;set cursor service 
mov ch,hi_scan_line ;scan lines: 0-7 
jif color/graphics 
mov cl,lo_scan_line ;scan lines: 0-12 
;if monochrome 
int 10h ;video services 
Different shaped cursors result from 
assigning different values to CH and CL. 
Some possible assignments for the eight 
scan lines ona color monitor are shown 
in Figure 1. 
If we wish to turn the cursor off alto- 
gether, we assign a greater value to CH 
than to CL: 


TURN 
CURSOR hi_scan_line (CH) = 5 
OFF: lo_scan_line (CL) = 3 


With JNTR, we can also execute this 
video BIOS call in Turbo Pascal, as 
shown in Listing 2. 


INLINE statement 

Turbo Pascal’s INLINE statement pro- 
vides a way to insert machine code di- 
rectly into a Turbo Pascal program: 


inline($B4/$02/ 


mov ah,2} 
$CD/$21); 


int 21h } 


$B4/$02 are the two bytes of machine 
language representing the 8088 instruc- 
tion mov ah,2, and $CD/$21 is the ma- 
chine language for int 21h. The four 
bytes are actually inserted into the com- 
piled Pascal program at this point. Turbo 
Pascal syntax requires that the bytes be 
separated by a slash mark (/) and that 
the sequence of bytes be parenthesized. 

We programmers think in terms of 
moy ah,2, but INLINE requires us to de- 
termine the corresponding machine lan- 
guage representation. This can be done 
with the simple assembler in DEBUG. 
For more complicated assembly language 
routines, especially those involving labels, 
LST files can be used. These files, gener- 
ated by the macro assembler, contain the 
assembly language source code side-by- 
side with the corresponding machine 
language. 


A disk file can be read into memory 
much more quickly in assembler than 
with Turbo Pascal’s READ. Listing 3 
shows an example of INLINE code to 
open a disk file, read a specified number 
of bytes into a Turbo Pascal array, and 
then close the file. 

The file is opened with the “open a 
file” service at interrupt 21h (AH = 
3D). This service requires that the ad- 
dress of the file name first be loaded into 
the DX register: 


lea dx,file_name 


Upon return from interrupt 21h, the AX 
register contains the file handle, a 16-bit 
quantity that is identified with this file in 
subsequent operations. This handle must 
be specified to read or close the file, for 
example. 

Turbo Pascal global variables are de- 
clared to hold the file name, handle, and 
other relevant information (BUFFER, 
the array into which the file will be read; 
FILE_SIZE; and OK, which tells 
whether the file was successfully 
opened). 

The INLINE code finds the Turbo 
Pascal variables by direct reference: 


$8D/$16/file_name/ {lea dx, file_name} 


An LST file would contain the two-byte 
$8D/$16 opposite the /ea instruction, to- 
gether with a two-byte address. As 
shown previously, we simply fill in a 
Turbo Pascal global variable name 
(file_name). 

In effect, the Pascal program sends in- 
formation to the INLINE routines (file 
name, file handle, and buffer address) 
and receives information from the JNV- 
LINE routines (file handle, number of 
bytes actually read, and error status). 
This two-way transfer of information is 
possible because the INLINE code can 
locate the addresses at which Turbo Pas- 
cal variables are stored. 

To make this transfer work, you need 
some knowledge of how Turbo Pascal 
stores variables. The name of the file to 
be opened is read into the Pascal string 


variable file_name with readIn. As al- 
ready discussed, the INLINE code finds 
the address of this variable with: 


$8D/$16/file_name/ {lea dx, file_name} 


However, Turbo. Pascal uses the first byte 
of a string variable to store the number 
of characters currently assigned to the 
string variable. The string itself—the file 
name in this case—is stored starting at 
the second byte. This is the reason for 
the next instruction: 


inc dx 


Turbo Pascal takes an entire byte to 
store a Boolean variable, with the infor- 
mation residing in the least significant 
bit: 1 = TRUE, 0 = FALSE. The disk- 
related DOS calls signal an error by set- 
ting the carry flag. If we find the carry 
flag set in the JNLINE routine, we pu a 
0 in Boolean variable OK: 


mov ok,0 


OK will then register as FALSE when 
we return to Turbo Pascal. 

Somewhat different methods are need- 
ed to find variables other than global 
variables. The instructions in the JN- 
LINE example depend on the fact that 
Turbo Pascal maintains its global varia- 
bles in the data segment. Different kinds 
of variables are stored differently: 


Where 
Kind of variable 
variable stored 
Global Data segment 
Local Stack segment 


Address in 
stack segment 
Code segment 


Variable parameter 
Typed constant 


Turbo Pascal externals 

Externals are COM files inserted direct- 
ly into a Turbo Pascal program. Param- 
eters are passed on the stack. Turbo 
Pascal views the COM file as a proce- 
dure. The external declaration must be 
followed by the name of the COM file, 


procedure set cursor (hi scan line, low _scan line: byte); 


record 
ax, bx, cx, dx, bp, di 
end; 
var registers: regs; 
ch,cl: = byte; 


type regs = 


i,si,ds,es,flags: integer 


{AH = @lh; AL = dn} 


{CH is high byte of cx} 


{CL is low byte of Cx} 


begin 
with registers do 

begin 
ax := $0100; — 
ch := hi scan line; 
cl := low scan line; 
ex := 256*ch + cl; 
intr ($18, registers) 

end {with} 


end; {procedure} 


Listing 2. 


{INT 18h} 
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program read file into buffer; 
const max size = 100G; 


file 1 name: 

puffer: 

file size, handle: 
ok: 


var 


string[50]; 

arrayl1..max size] of byte; 
integer; 

boolean; 


(Ren a a ® ) 


_ procedure get name Os file; 


begin 


Gliese: 


write('ENTER PATH AND NAME OF FILE TO READ: '); 


readin(file name); 


file name := file name + chr (@); 


OK 3= true; 


inline 
-(sB0/ $00/ 
_ $B4/$3D/ 
_ $8D/$16/file name/ 
— $42/ 
_ §cD/$21/ 


 SA3/handle/ , 
—$73/$05/ 
_ $C6/$06/ok/$O0) 
end; {procedure} 


procedure read file; 
begin 
inline 
($8B/S1E/handle/ 

$B4/$3E/ 
$8D/$16/buffer/ oy 
$8B/$@E/file size/ 
$CD/$21/ 


SA3/file size/ 
$B4/S3E/— 


{ASCI1Z format} 


{TRUE = @lh in memory} 
{mov al, ;read only access } 
{mov ah, 3Dh ;open a file service } 
{lea dx,file mame ;DX <-- addr of Turbo var j 
« {ine dx ;go to string data } 
{int 21h ;DOS call j 
;NOTE: AX <-- handle } 
{mov handle, ax . 
{jnc instr after next } 
{mov ok,W ;0k = FALSE(9Gh) } 
( Bn ) 
{mov bx,handle ;BX <-- handle } 
{mov ah,3Fh ;read a file service } 
{lea dx,buffer ;DX <-- addr of Turbo var j 
{mov cx,file size<*;# bytes to read } 
{int 21h ;DOS call j 
{ 7AX = #bytes actually read} 
{mov file size,ax } 
{mov ah, 3E ;close file service } 
{int 21h ;DOS call j 


"SCD/S2)) 
end; {procedure} 


( *#---------------- ---- + - = $= * ) 


begin {main} 
get _name open file; 
if ok then 
_ begin 


file size += ax Size; 


read file 
end 
else 
write( 'ERROR' ) 
end. 


Listing 3. 
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{name in file name, error status in ok} 


{NOTE: file size has been adjusted}. 


between quotes, as it appears in the disk 
directory. 

Listing 4 is a Turbo Pascal program to 
fill the color/graphics screen with a pre- 
scribed attribute and character. Both of 
these parameters are passed to a COM 
external that does the filling (fast). 

FILL.COM must be on the default 
drive for program fi//_screen to compile. 
FILL.ASM, the source code for FILL 
.COM, is shown in Listing 5. Recall that 
FILL.ASM must be assembled with the 
macro assembler, linked, and converted 
to a COM file with EXE2BIN to pro- 
duce FILL.COM. 

The first two and last two instructions 
of the COM file must be: 


push bp 
mov bp,sp 


stack. Here, two integers, or four bytes, 
are passed, hence ret 4. 

Procedure FILL(ATTR, CH) has two 
ret 4 parameters in the Pascal program— 
ATTR is the first parameter and CH is 
the second. The parameters are found in 
the COM file relative to the base pointer 


The operand of ret will vary depending 
on how many bytes are passed on the 


program fill screen; 
var attr, ch: integer; 
procedure fill(attr,ch: integer); external 'fill.com'; 


begin 
write('ENTER ATTRIBUTE, THEN CHARACTER: '); 
read(attr, ch); 
fill(attr, ch) 
end. { 


{NOTE: attr is FIRST parameter} 
ch is SECOND parameter } 


Listing 4. 


;FILL.ASM -- For use as an assembler external with Turbo Pascal. 


code segment 
assume cs:code 


fev proc near 


sthis must be converted to FILL.COM 
*TAKES 2 INTEGER PARAMETERS 


;these two statements are necessary 
;the passed parameters are on the stack 


jand BP is used to point to them 
7BP, CS, DS, and SS must always be preserved 


sold DS must be saved -- #t."s changed here 

we are going to poke directly into screen RAM 
rassumes color card -- would be ®B@@Gh on mono 
;DS <-- OB8”0Gh 

;the 2nd parameter is at [BP]j+4 (the character) 
;the Ist parameter is at [BP]+6 (the attribute) 
tnumber of character/attributes to write 

7;BX will point to screen offset 

;loop to fill the top 24 lines 


push ds 
mov ax,9B800h 


mov ds,ax 

mov al, Lbpj+4 
moy ah,[bp]+6 
mov cx, 1920 
mov bx,% 


jincrement twice because the mov writes 


two bytes 


again: mov [bx],ax 
qe = bx 
Fuses lene 
loop again 
pop ds 
* pop bp 
ret 4 


;these two statements are necessary 
?The 4 is required because four bytes were passed on 


;restore Turbo Pascal's data segment 


zthe stack as parameters. The ‘ret’ increments 
;the stack pointer (SP) by 2, but we need to inc- 
7rement SP by another 4 to get back to Turbo’s SP. 


fiil endp 
code ends 
end : 


Listing 5. 


register (BP), which is used to locate in- 
formation in the stack segment. 

BP locates the parameters in the order 
opposite to which they were passed. The 
second, or last, parameter (CH) is found 
at [BP] +4; the first, or next-to-last, pa- 
rameter (ATTR) is at [BP]+6. - 

The last parameter is always at 
[BP]+4, but the location of the next-to- 
last parameter depends on the size of the 
last parameter. If the last parameter 
were a string/3/, which is four bytes 
long, for example, then the next-to-last 
parameter would be at [BP]+8. The sec- 
ond-to-last parameter would be at some 
still higher address, and so on. The stack 
of FILL.COM is shown in Figure 2. 

Turbo Pascal allows a program to 
know the address of any of its variables. 
If VAR_NAME is a Turbo Pascal vari- 
able, then OFS(VAR_NAME) is the var- 
iable’s offset address and SEG 
(VAR_NAME) is the variable’s segment 
address. 

These addresses are integers and can 
be passed as integer parameters to an ex- 


STACK in FILL.COM 


Low addresses — 


Turbo's DS: 
Turbo’s BP: 
Return address: 


2nd parameter: 


lst parameter: 


High addresses 


ternal COM file. The COM file then 
knows where the Turbo Pascal variable is 
and can access it freely. As with [V- 
LINE code, information can be sent in 
both directions through Turbo Pascal 
variables. 


DEBUG breakpoints 

Interrupt 3 generates a DEBUG break- 
point. This means that when a program 
running under DEBUG control encoun- 
ters an INT 3, the program stops execu- 
tion, the 8088 registers and flags are 
displayed, and control reverts to the DE- 
BUG command line. From here you can 
single step through a compiled program 
and examine memory, whether Turbo 
Pascal variables or stack. 

This process is easiest if you first com- 
pile the Turbo Pascal program as a 
COM file and then execute the COM 
file under DEBUG control. To single step 
through a breakpoint, reset the instruc- 
tion pointer (IP) to the byte after the 
INT 3, then resume single stepping (oth- 
erwise you never get past the INT 3). 


Turbo's BP and the instruction pointer (IP) of the return address are al- 
ways as shown. Passed parameters are at higher addresses, with the 


last parameter passed listed first, and so on. 


Turbo’s data segment (DS) was saved on the stack only because 
FILL.COM alters it. This value is restored into DS (pop ds) before returning 


to Turbo. 


Figure 2. 
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INT 3 is coded as a single byte (CO), 
so this JVLINE statement will generate 
a breakpoint in a Turbo Pascal program: 


inline($CC) 


This technique is invaluable for debug- 
ging. For example, in the COM file ex- 
ternal, we can insert a breakpoint just 
before the call to the external: 


read(attr, ch); 
inline($cc); 
filllattr, ch) 


If we then run the Turbo Pascal program 
as a COM file under DEBUG control, 
the Pascal read will function as usual 
and wait for our input. But after pressing 
Enter, control reverts to DEBUG and we 
can then begin single stepping through 
the program. After a few instructions in- 
serted by the compiler, we come to the 
external: 


push bp 
mov bp,sp 
push ds 


and so on. The stack can be viewed to re- 
solve any question about the location of 


parameters. ls | 
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verything you need to write dramatic 
graphics effects into your Eco-C88 C 
programs. Some of the features include: 
e Support tor EGA, CGA, and Z100 
© Over 100 graphics and support functions, many 
of which are PLOT-10 compatible. 
e Many low level support routines reside outside 
your small model code-data area 
Can write dots thru the BIOS (for compatibility) 
or to memory (for speed) 
Graphics function help from CED editor 
available 
e World, pixel or turtle color graphics modes 
47 standard fill patterns, 17 line dashing 
patterns, Hershey fonts, plus user defineable 
fill, dash and fonts 
© Supports view areas, rotateable fonts, clipping, 
arbitrary fill areas, extensive error checking, 
examples, and user's manual. 
A must for the graphics enthusiast and a 


bargain at only 3995 


“Requires Eco-C88 C Compiler. 


ln IE a} \") NE | | hai \ | 
tel | hf 
du | Ll 


YOUR 


This windowing library allows you to add pop up 
windows in your C programs quickly and easily. 
Use them for help windows, selection menus, error 
messages, special effects —anywhere you need an 
attention getter. Just some of the features include: 
e CGA, EGA, and monochrome support 
e Slow mode option for "flicker" displays 
e Control any program that goes through the 

BIOS 


eel 


ECO-C88 
COMPILER Ecosoft 


Support Products 
FLEX GaP 


Use up to 255 windows 
No special window commands; use print f () 
Resize and move windows 
Custom window titles and borders 
Can be used with ANS! device driver 
Most of window's code-data lies outside small 
model limits ¥ 
Use any of the IBM text or block characters 
| © User's manual and examples 
The Windowing Library requires an IBM PC 
compatible BIOS and the Eco-C88 C compiler. 


ONLY $29.95 


AC compiler with many ANSI enhancements 
at an unbelievably low price. The Eco-C88 C 
compiler has: 

Prototyping (the new type-checking 

enhancement) 

Enum and void data types 

Structure passing and assignment 

All operators and data types 

A standard library with more than 200 func- 

tions (many of which are System V compatible 
F for greater code portability) 

Now you can combine your modules, functions, e CC and mini-make that all but automates the 

and subroutines into your own library for easy link compile process 

commands. Fully compatible with ANY standard e 8087 support (we sense the 8087 at runtime 

OBJ format files (not just Ecosoft’s products). — no dual libraries) 

With the Ecosoft librarian, you can: ASM or OBJ output for use with MSDOS linker 

e Add, delete, and extract from a library © Tiered error messages — enable-disable lint- 

© Get table of contents or index of a library like error checking 

e Combine libraries, control library page size, use | © Fast compiles and executing code 

switches for combinations, process complex e Expanded user's manual _ 

library requests, use wildcards, and do library e CED full-screen program editor 

directives from command files. Everything you need at the unbelievable 
e Complete with user's manual price of $59.95. 

A valuable addition for any programmer. Eco-C88 C compiler requires an IBM PC, XT, or 


ONLY $29. Os AT (or compatible) with 256K of memory, 2 disk 
e 


drives and MSDOS 2.1 or later. 
Orders only: 


1-800-952-0472 | 


Technical Information: 


Ecosoft Inc. 
6413 N. College Ave. 


(317) 255-6476 Indianapolis, IN 46220 
Es eee — a) oe Gea) See] 


| ORDER FORM CLIP & MAIL TO: Ecosoft Inc., 6413 N. College Ave., Indianapolis, IN 46220 


ITEM PRICE QTY TOTAL 


Flexi-Graph Graphics $39.95 
Window Library $29.95 
Eco-Lib Librarian $29.95 
Eco-C88 C Compiler CED $59.95 


SHIPPING 
TOTAL (IND. RES. ADD 5% TAX) 
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Cll [a a Se Se ee Not Oe. 
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HOW TOWRITEAWINDOWS 
APPLICATION IN TEN MINUTES. 


=f MeActor Vorkspace SeaeimaammmalNnN, || 


Hie tht. Doit® Browset Inspect! Shou Roon! 


ail, 
388) 
shou(San, 1) 
doe : neu(Seribble, ThePart, nal, 
"Another Scribble Window", 
8(58 50 368 38B)) 


shoutdoe, 1) 
<a Seribble> 


ee Se Browser: Scribble } 
: 


tions Jenplates Doit! Inspect? 
inDrag 


foal 
Re 
8 


yzer 
torfnalyzer 
0 


ol Vindory rea 
fe Initialize mouse dragging. */ 
fef btegqinBrag(self, uP, point) 
{ Call SetCapture(hind) ; 
draghf z= getContext(self); 
naveTo{point, dragDl); 


= Browser: PopupWindow Al} 
x ptions Tenplates Doit! Inspect? } 

‘opupwindow 

cripple 

Tooltindoy 

Brouser 


7» Create a nev Popup window, */ 
Def neu(self, par, menuNane, wNane, rect | thelind, sRect) 


1f not(sRect := rect) 
then sRect z= rect(278, 86, 478 + x(screenSize())/4, 
min(screenSize().y, 245 + y(screenSize())/4)); 
endif; 
theind := neu(self :Behavior) ; 
loadtenu(thelind, menuNane); 
create(thelind, par, vNane, sRect, US. POPUPUINDOW) 5 
Call SetUindowlord(handle(theWind), 8, hash(thelind)); 
thelind.paintStruct z° static(neu(Struct, 32)); 
sant (thellid) 5 
elind 


Actor™ is anew language that combines Microsoft® Windows with 
object-oriented programming. This means you can produce mouse and win- 
dow applications very quickly. 

For example, we created a simple “paint” program, and used it to draw 
the Actor logo you see on the screen. The whole program only took ten lines 
and ten minutes. Part of it is in the middle window on the left. 

Above, you see the commands that initialized the paint window and 
made it appear on the screen. Below, some code that’s built into Actor, 
specifying window behavior. Through a process known as “inheritance,” it’s . 
called into play automatically. 

Try programming in this new way, and you'll never go back. 


Rnd out about Actor. 
Call The Whitewater Group,(312) 


Technology Innovation Center a 
906 University Place, Evanston, IL 60201 
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orland Interna- 
tional’s Turbo 
Pascal is a suc- 
cessful product, 
and deservedly so. Turbo Pascal brought 
Pascal to the masses with a surprisingly 
good programming language product at 
a very low price. 

Yet, like any sophisticated compiler, 
Turbo Pascal has many idiosyncrasies. 
Well known are its shortcomings for 
large programming projects, such as 64K 
limits on code and data segments. But 
Turbo Pascal has many other surprises, 
both good and bad. 

In this article we discuss seven of our 
favorite Turbo Pascal discoveries— 
techniques and pitfalls uncovered during 
our research for two recent books (Turbo 
Pascal Tips, Tricks, and Traps and 
Turbo Pascal Program Library, both 
published by Que Corp.). This material 
is based on standard (not BCD or 8087) 
Turbo Pascal v. 3.01A running on an 
IBM PC or compatible, but most of the 
concepts apply to other versions of Pas- 
cal, and in some cases even to other 
languages. 

1. Subprograms can process different- 
sized arrays or strings through the use of 
untyped variable parameters. 

When you pass an array or string to a 
subprogram, generally you must explicit- 
ly declare the array or string type in the 
subprogram’s argument list. As a result, 
you must declare the type identifier glo- 
bally. This restriction seems to preclude 
writing general-purpose subprograms to 
process different-sized arrays. After all, 
don’t all arrays have to use the same 
type declaration the subprogram uses? 


No. The untyped variable parameter 
permits you to write general-purpose sub- 
programs for array or string processing. 
By omitting the type declaration from 
the subprogram’s parameter list, you can 
overlay the passed parameter with any 
type declaration you choose. Here’s an 
example. 

Suppose you have two different-sized 
integer arrays in a program and you 
want to create a single function that can 
calculate the sum of the elements in ei- 
ther array. You want to pass to this Sum 
function the array name and the upper 
bound of the selected array—let’s say 
one array has 10 elements and the other 
has 200. Then you want Sum to calcu- 
late the sum of all array elements from 
element | through the upper bound. The 


Deal With Them 


By Tom Rugg and Phil Feldman 


function Sum, shown in Listing 1, per- 
forms this task. 

Note that the array called MyArray 
has no type specification in the function 
declaration. NewArray is then declared 
to be absolute to MyArray, meaning that 
both arrays occupy the same memory lo- 
cations. Therefore, when NewArray is 
examined or changed, the original array 
is actually used instead. And because 
NewArray is declared (using TempType) 
to be of maximum size, any sized My- 
Array can be passed to Sum. This tech- 
nique makes Sum a general-purpose 
subprogram. The same approach works 
with strings. 

2. Make sure your distributed 
programs can be run on any system, 
whether the system has the monochrome 


Function Sum(var MyArray; Count: integer): integer; 


{Compute the sum of the first Count elements in’ MyArray. } 
{MyArray is an untyped variable parameter. } 


type 
TempType = array|1..maxint] of integer; 
var 
NewArray : TempType absolute MyArray; 
J, Result +: integer; — 
begin 
Result := 0; 
for J := 1 to Count do 
Result := Result + NewArraylJ]; 
Sum := Result 
end; 
Listing 1. 
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or color graphics adapter (CGA), and 
with either black and white or color 
CRTs. 

If it produces graphics output, your 


program obviously must be run on a sys- 
tem that supports graphics. However, if 
your program produces text-only output, 


you can easily guarantee the program 
can be run on any system, no matter 


what kind of video adapter and CRT the 


system has. 
If you distribute your Pascal source 


code to another user who has Turbo Pas- 
cal, no problem—that user can compile 


your program. As long as that user has 


properly installed Turbo Pascal for his or 
her system, the output will be readable. 
But if you decide to protect your source 


code and therefore distribute only a 
.COM file, what video options should 
you use to enable any user to run the 
program? 


The critical question is whether or not 
you have used TINST correctly to install 
Turbo Pascal. Turbo Pascal provides the 
TINST utility to customize Turbo Pascal 
for your system. The important rule is to 
avoid TINST screen option 1 (the mono- 


chrome adapter). Compile the program 


while option 0, 2, or 4 is in effect, even if 
you have a monochrome adapter on your 


system. 


Option 0 causes Turbo Pascal to gen- 
erate code that works fine when the pro- 


gram is run on either the monochrome 
adapter or CGA (or the EGA in CGA 


mode). To be safe, you should begin your 
program with the Jowvideo command be- 
cause some compatibles display strange 

output when the default normvideo is in 


effect. 


Option 2 is for 80-column output on a 
color monitor, and option 4 is for 80-col- 
umn output on a black and white moni- 
tor. Option 4 works fine in all situations 


we have tested. Option 2 is fine for a 
monochrome adapter, but with a black 


and white monitor attached to a CGA it 


is readable only when Jowvideo is in 
effect. 


Run your own tests to be sure, but the 


safest course we know is to use TINST 
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options 0, 2, or 4 and be sure Jowvideo is 
in effect. 

3. Improve program speed by passing a 
large array or record to a subprogram by 
reference (using var), not by value (without 
var). ‘i 

When you build a subprogram, you 
have to choose whether the main pro- 
gram will pass parameters to the subpro- 
gram by reference or by value. If you 
include the word var in the procedure or 
function declaration, you are choosing to 
pass the parameter by reference, and 
Turbo Pascal passes only a pointer to the 
data. When you pass by value (without 
var), Turbo Pascal passes a work copy of 
the data. 

Many programmers are aware that 
passing by reference is more efficient 
than passing by value, but you may be 
surprised to find out how big the differ- 
ence is. 

In most cases, the speed and memory 
usage differences are minor between 
these two methods. However, if you pass 
large arrays, large records, or long 
strings, the differences can be staggering. 
Making that temporary copy of the data 
obviously takes some time and must oc- 
cupy memory (from the stack). Calculat- 
ing the memory usage is a simple matter 
that we’ll leave to you, but judging the 
speed difference takes some experimenta- 
tion. Here are a few simple timing com- 
parisons to give you .a-feel for the 
differences. ‘ 

We wrote a simple program that 
passes a single parameter to a dummy 
procedure 200,000 times. We ran the 
program on a standard IBM PC using 
different type specifications for the pa- 
rameter. Then we subtracted the loop 
overhead time so we could get a fair 
comparison of the actual time required 
to invoke the procedure each way—by 
reference and by value—with each data 
type. 

The results are virtually identical for 
the simple data types (integer, byte, 
Boolean, and char). These types each 
take 16.9 seconds whether passed by ref- 
erence or by value. A real variable 
passed by reference also takes 16.9 sec- 
onds. However, a real variable passed by 
value takes slightly longer (24.3 sec- 
onds). Considering there are 200,000 
repetitions, that is not much longer per 


repetitions, that is not much longer per 
subprogram call. 

The big differences come with larger 
data types. Passing a large array or 
string by reference still takes the identi- 
cal 16.9 seconds that passing a simple 
single variable by reference takes. But 
passing a large array or string by value 
takes considerably longer. It takes 184.8 
seconds to pass a 200-byte string by val- 
ue. That’s more than 10 times as long as 
the time to pass the same string by refer- 
ence. An even larger difference occurs. 
when passing a 1,000-entry integer array, 
which takes 1534.9 seconds when passed 
by value. That’s nearly 100 times as long 
as passing the same array by reference. 

The performance difference can be 
huge. Remember that passing param- 
eters by reference causes the subprogram 
to work with the same copy of the data 
that the main program uses, so any 
changes to the data are destructive. In 
theory, you should pass by reference only 
when the subprogram needs to alter the 
data. In practice, sometimes you may 
want to pass by reference to improve 
performance. 

4, Avoid having to reload 
COMMAND.COM after you run a Turbo 
Pascal .COM file by limiting the maxi- 
mum free dynamic memory at compile 
time. 

An annoying thing often happens after 
executing a Turbo Pascal program that 
has been compiled into a .COM disk file. 
If the disk in drive A is not formatted 
with system files, the computer prompts 
you to insert a COMMAND.COM disk 
before you can resume work. (This prob- 
lem does not exist with a properly config- 
ured hard disk system because 
COMMAND.COM should always be 
accessible on the hard disk.) 

The prompt occurs because the Turbo 
Pascal program overlaid some DOS code 
in the computer’s highest RAM address- 
es. Unless your Turbo Pascal program re- 
quires nearly all available memory, you 
can prevent this annoyance by taking the 
following steps at compile time. : 

After you enter the O (options) com- 
mand from Turbo Pascal’s main menu 
and then the C subcommand to indicate 


TRUE 


MULTITASKING 


With 
MultiDos Plus 
“multitasking for the IBM-PC.” 


Ideal for developing applications 
in process control, data acquisi- 
tion, communications, and other 
areas. Check these features which 
make MultiDos Plus an unbeat- 
able value. 


e Run up to 32 programs concur- 
rently. 

e Your software continues to run 
under DOS. No need to learn a 
new operating system. 

e Use the compilers you already 
have. Supports software written in 
most languages. 

e@ Operator commands to load/run 
programs, change priority, check 
program status, abort/suspend/ 
resume programs. 

e Programmatic interface via INT 15H 
for the following. 


*  |ntertask message communica- 
tion. Send/receive/check mes- 
sage present on 64 message 
queues. 

* Task control by means of 
semaphores. Get/release/check 
semaphores. 

* Change priority-256 priority 
levels. 

* Suspend task for specified 
interval. 

* Spawn and terminate external 

and internal tasks. 

Disable/enable multitasking. 

and more! 

e Independent foreground /back- 
ground displays. 

e Access to DOS while applications 
are running. 


* 


* 


Hardware/Software Requirements 


IBM PC/XT/AT or true clone. Enough 
memory to hold MultiDos Pius (48 
KB) and all your application programs. 
Also may need 4 or 16 KB memory 
for “hidden screens’ for each active 
task. MS-DOS (or PC-DOS) 2.0 or 
later operating system. 


only: $24.95 OR 
$99.95 


with source code ‘ 


Outside USA add $5.00 shipping and handling. 
Visa and Mastercard orders only call 
toll-free: 1-800-872-4566, ext. 350., or 
send check or money order to: 


NANOSOFT 


13 Westfield Rd, Natick, MA 01760 
MA orders add 5% sales tax. 
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UNIX/C WINDOW DEVELOPMENT 
COMPATIBILITY with 
CURSES for MS-DOS and MS-OS/2. 


THE BETTER PRODUCT. “Aspen Scientific’s , ‘ 
Curses library is a fine PC version of System V iy FREE - FAST 
Curses. Screen updating was fast and clean... UNIX compatible forms 
has good documentation and is available tool kit with source code. 
for many compilers...less expensive... Included if you ORDER 
its greater flexibility makes it an RIGHT NOW. 
attractive package for developers” NS 
Computer Language June/87 Complete curses tool kit: $1 1 . 
Source code available for: $289. 
Look at a few of the applications 
our Curses is benefiting: « Aerospace 
~ Robotics.“ Consulting “ Telephone: 
Switching “AI + Voice Recognition 
¢ Financial “Engineering «Word 


Processing 
Y a Pa 


ASPEN SCIENTIFIC 


Microsoft 
P.O. BOX 72 WHEAT RIDGE, 


rt) 
i] 
£ Datalight 
G ata igne 
@ 
COLORADO 80034-0072: 


Eet'si€ 
i] : Ct 
= (303) 423-8088 


Trademarks: MS-DOS, MS-Windows, MS-OS/2, XENIX, Quick C (Microsoft); Unix (AT&T Bell Labs); Turbo ( (Borland); 
Aztec (Manx); Lattice (Lattice); Let’s C (Mark Williams); DeSmet (DeSmet Software); Datalight (Datalight). 


Our Curses blazes on IBM PC’s 


and compatibles, but is 
versatile enough to work 
with MS-Windows and any “fy, 


PC running MS-DOS 2.0 Wi 
or later. Vy 
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sew Code View? 
For Turbo Pascal? 


T-DebugPLUS 2.0 brings powerful but easy-to-use symbolic run-time 
debugging to your fingertips -- the same power you'd expect to find in 
Microsoft's Code View™. Debug Turbo Pascal programs faster with: 

¢@ Watch windows for variables 

¢ Conditional breakpoints 

@ CGA, EGA & Hercules graphics 


"T-DebugPLUS is the 
MAGAINE most important Pascal : 
tool ...since Turbo itself. 
CHOICE PC Magazine, June 23, 1987 


EDITOR'S 


T-DebugPLUS is only $60. 
Call toll free for credit card orders. 


1-800-538-8157 x 830 


1-800-672-3470 x 830 in CA 
Satisfaction Guaranteed or your money back within 30 days. 


Also from TurboPower Software: Turbo OPTIMIZER, makes For other information call 408-438-8608, 9AM to SPM PST. 
your compiled programs smaller and faster, only $75. Shipping & taxes prepaid for US and Canadian customers, 
Turbo EXTENDER, breaks the 64K barrier, only $85. others please add $6 per item. CodeView is a trademark of 
TurboPower Utilities, only $95 with source. Microsoft Corporation. ©TurboPower Software, 1987 


TurboPower Software 3109 Scotts Valley Dr., Suite 122 Scotts Valley, CA 95066 
CIRCLE 51 ON READER SERVICE CARD 


: 


ee 


you want to create a .COM file, Turbo 
Pascal displays four additional lines on 
the screen. The fourth line is for the A 
subcommand, which specifies (in 16-byte 
paragraphs) the maximum free dynamic 
memory. 

Turbo Pascal sets aside a dynamic 
memory area for the heap and stack 
combined. Unless you say otherwise, 
Turbo Pascal uses all available upper 
memory for heap stack space, thus step- 
ping on the DOS code in upper RAM. 
To prevent this data destruction, use the 
A subcommand to tell Turbo Pascal to 
leave some of the upper memory alone, 
thereby eliminating the need to reload 
COMMAND.COM after the program 
runs. 

And just what number should you 
specify when using the A subcommand? 
That depends on how much upper mem- 
ory you need to tell Turbo Pascal to pre- 
serve (which varies with different DOS 
versions, but 32K ‘should be adequate). It 
also depends on how much RAM your 
system has, the code size of your pro- 
gram, and the amount of dynamic mem- 
ory your program needs. 

Setting the maximum free dynamic 
memory to the default minimum (hex 
400 paragraphs—equal to decimal 
16,384 bytes) should be sufficient if your 
program allocates no dynamic memory 
(using new or getmem), passes no large 
arrays (or records) by value to subpro- 
grams, and defines no large arrays or re- 
cords in subprograms. If your program 
uses dynamic memory, however, you need 
to calculate how much and set the maxi- 
mum accordingly. 

5. Typed constants are really variables, 
not constants. 

“Typed constant” is a misnomer— 

a better name would be “initialized vari- 
able.” However, the derivation of the 
name is clear. A typed constant is called 
a constant because its declaration occurs 
in the const block along with standard 
constants, and it is called typed because 
you must specify its type (integer, Bool- 
ean, etc.) as part of its declaration. 
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In practice, however, a typed constant 
behaves like a variable. Actually, it is a 
variable. Unlike regular constants, you 
can use a typed constant identifier any- 
where a variable identifier is legal. Note 
especially that you can redefine the value 
of a typed constant with an assignment 
statement. 

Even though typed constants are varia- 
bles, not constants, they are allocated in 
memory differently from regular varia- 
bles. Like regular constants, typed con- 
stants are stored in the code segment 
along with your executable program code 
and the run-time library. Normal static 
variables declared in the var block of 
your main program (as opposed to dy- 
namic variables allocated in the heap or 
variables declared in subprograms) are 
stored in the data segment. So, although 
a typed constant acts functionally just 
like a variable, it is allocated to a differ- 
ent part of limited memory. 

You can take advantage of these allo- 
cation differences. If your data segment 
fills, try converting some of your varia- 
bles into typed constants. Similarly, if 
your code segment fills, try turning some 
of your typed constants (and regular con- 
stants) into variables. For structured data 
such as arrays and records (which eat up 
lots of memory), this technique can mean 
the difference between success and fail- 
ure in fitting a program into Turbo Pas- 
cal’s limited memory space. 

6. All conditions are evaluated in a 
logical expression. 

In theory, a Boolean expression may 
not require that all conditions be evaluat- 
ed. Consider these two logical 
expressions: 


Condition! or Condition2 {expression 1} 
Condition3 and Condition4 {expression 2} 


If Condition! is true, then expression 
1 is true no matter if Condition2 is true 
or false. Similarly, if Condition3 is false, 
the second expression is false and there is 
no need to evaluate Condition4. There- 
fore, Turbo Pascal could save some ex- 
ecution time by evaluating the second 
condition only when necessary. 

Unfortunately, Turbo Pascal always 
evaluates every condition when evaluat- 
ing an entire expression. This is not just 
a minor performance annoyance; it can 


lead to serious problems any time you 
write multiple-factor logical expressions 
containing conditions that are not well 
defined for all eventualities. 

Consider this example: 


Counter := O; 
repeat 

Counter := Counter + |] 
until 

(Counter = 101) or 


(MyArray[Counter] = 0); 


Here, MyArray is an integer array de- 
fined with an integer index ranging from 
1 to 100. The programmer wrote this 
code fragment to test for the first ele- 
ment of MyArray that has a value of 0. 
If such an element is found, the repeat- 
until loop terminates at the time Counter 
contains the index value of the 0 element. 
If no 0 element is found by the time 
Counter reaches 100 (the defined upper 
bound of MyArray), Counter is incre- 
mented to 101. 

The programmer expected that the 
test for Counter being 101 would end the 
loop. In this case, the fact that Counter 
had the value of 101 would indicate that 
no element of MyArray was 0. 

The thinking was sound as far as it 
went, but a detail was overlooked. Turbo 
Pascal evaluates all conditions in logical 
expressions, which leads to trouble if 
Counter becomes 101. Turbo Pascal will 
evaluate the second condition and test 
the 101st entry of MyArray, which is be- 
yond the defined bounds of the array. 
The results can be a run-time error. 

In logical expressions, be sure your 
multiple-factor conditions are legitimate 
under all conditions. 

7. Explore the machine language code 
that Turbo Pascal generates. 

You may find it instructive to investi- 
gate the machine language code generat- 
ed by Turbo Pascal. Maybe you want to 
optimize a critical section of code, or 
you’re overcome with hacker’s curiosity, 
or you just want to improve your assem- 
bly language knowledge. You won’t find 
any help in the Turbo Pascal manual, so 
here are two approaches to exploring 
Turbo Pascal’s object code. 


é¢ 


for 


..- areal 
UNIX Sys 
your 386 or 


stem V 


286-based PC!” 


Microport System V/AT and Microport 
System V/386 are fully-licensed imple- 
mentations of the certified AT&T UNIX 


System V Release 3 for personal computers. 


Microport System V provides true multi- 

user and multi-tasking capabilities. It 

runs in protected mode and supports the 

entire address space available; up to 

sixteen megabytes on an AT and up to 

four gigabytes on an 80386. It supports 

all standard hard disks, multiple printers, 

multiple modems, 2 to 17 users on a single 

AT, and an unlimited number of users 

on an 80386. 

Additional features: 

® Demand-paged, virtual memory 
management. 

® Virtual consoles allow fifteen virtual win- 
dows of operation for UNIX applications 
and DOS windows under DOS Merge. 

® Electronic mail, communications with 
uucp and CU. 

® Dynamic buffer allocation. 
®PC-DOS partitioning allows DOS and 
System V files to reside on the same hard 
disk (not required with DOS Merge). 

® Shared libraries. 

® 80286 compatibility. 

® Link kit to allow user installable device 
drivers. 

® Menu-driven system administration. 

® On-line help facility. 

Microport Sys Vision™ is a part of both 

System V/AT and System V/386, so you 

won't have to worry about system admin- 

istration. Both are menu-driven and have 

context-sensitive help facilities. Sys Vision 

menus lets you perform all the system 

housekeeping and basic tasks without 

knowing the specific UNIX commands. 

It is menu-driven and has context-sensi- 

tive help facilities. 

RUNTIME PACKAGE. The System 

V Runtime Package contains over 180 

utility programs. It is one of the most 

comprehensive UNIX runtime systems 

currently available and includes the screen 

editor “vi” with user tutorials. 

System V is sold with a two-user UNIX 

binary license. For an additional fee, users 

can obtain a kit to upgrade this license 

to an unlimited number of users. 


80286: List $ 199 Ours $ 169 
80386: List $ 199 Ours $ 169 


UNLIMITED USER LICENSE 
Upgrades your System V Runtime a 
an unlimited number of users. 


80286: List $ 249 Ours $ 209 
80386: List $ 249 Ours $ 209 
SOFTWARE DEVELOPMENT 
Laat an AT&T C Compiler that makes 
full and efficient use of your processor's 
extended instruction set. The code pro- 
duced is among the most compact and 
fastest available. 

Sdb, the source level debugger, allows 
display of the actual lines of C code being 
executed. Many useful tools such as SCCS 
(source code control system), make and | 
ctrace are also provided. 


80286: List $ 249 
80386: List $ 499 


TEXT PROCESSING 


KIT 


Ours $ 209 
Ours $ 429 


SYSTEM. This 
package consists of the complete System V 
Release 2 Documentors Workbench 
(DWB). It includes both the new troff 
(device-independent troff) and the old 
troff (otroff). Drivers for the HP LaserJet 


Printer and APPLE’s LaserWriter are 


optionally available. 


80286: List$ 199 Ours $ 169 
80386: List$ 199 Ours $ 169 | 
COMPLETE SYSTEM V. Includes 


Runtime Package, Software Development 
Package and Text Processing Package. 


80286: List $ 549 Ours $ 465 
80386: List $ 799 Ours $ 699 


DOS Merge. DOS Merge is a true multi- 


user and multi-tasking environment that 
supports concurrent use of both UNIX 
and DOS. With DOS Merge, you can 


develop software by combining DOS and | 
UNIX programs and commands. Youcan | 
even run both UNIX and DOS programs | 
that use the same files. And DOS Merge | 
386 uses the full capabilities of the 80386's | 


memory management so you can run 
multiple DOS programs and UNIX pro- 
gramsatthesametimeondumbterminals. 
DOS Merge 386 comes in two versions: 
a 2-user version and an unlimited-user 
version. 


80286: List $149 Ours $125 | 
80386 Unltd: List $495 Ours $ 429 | 
80386 2 User: List $395 Ours $ 345 
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Microport Products 

List Ours 

System V/ 386 Complete System 99 699 
Runtime System /2 Users) 99° 169) 
Software Development System 499 429 

Text Preparation System 99 169 
(System V/ 386 Unlimited User License 249 209 
\DOSMerge 888 2-vser System 95 345 
‘DOSMerge 386 Un/imited-user System 495 429 
| System V/AY Complete System 5A9 465 
Runtime System /2 Users) 98 169 
Software Development System 248 209 

Text Preparation System. 99 169 
System V/ Al Unlimited User License 249 209 
DOSMerge286 49 125 


Prices include FREE UPS surface shipping 
to all U.S. customers. Express services 
are available at the shipping carrier's 
standard rate. 


When ordering, please specify 80286 or 
80386 computer. DOSMerge 286 doesnt 
work on all clones, please ask before 
ordering. 


‘Please refer to our main advertisement in 
this journal for more information and the 
largest advertised selection of program- 
‘mer’s development tools for IBM personal 

‘computers and compatibles. : 


Programmer's Connection 
136 Sunnyside Street 
Hartville, Ohio 44632 


Hours: Weekdays 8:30 AM to 8:00 PM EST. 


gE FE 


USA 200. 336-1166 
CANADA 800-225-1166 
OHIO & ALASKA (Collect) 216-877-3781 
INTERNATIONAL 216-877-3781 


CALL TOLL F 


CUSTOMER SERVICE 216-877-1110 
TELEX 9102406879 
_EASYLINK 62806530 


©) 1987 Programmer's Connection Incorporated. 
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dBASE Programmers 


are 
you 


ready? 


ellg>< 


If you need it, 
and think you can 
handle it, dB2c is 
here now. 


dB2c Offers: 


© Complete implementation of dBASE III+ 
functions and commands in C source code 

¢ Interfaces for Lattice’s dBC and Faircom’s 
c-tree. 

© Complete source code. 

© Support for the following C Compilers: 
Microsoft, Lattice, Aztec, DeSmet, and Instant- 
Gs 

e The freedom and peace of mind that only 
source code can offer. 

© Use of familiar syntax while learning C 

© Works on color, monochrome, and EGA 
monitors, 

© Versions available for MS-DOS, Xenix, Unix, 
OS-9 and Concurrent DOS 


ellB=<¢ Toolkit $299. 


Call or Write: 


SOFTWARE 
CONNECTION, INC. 
POB 712, Ely, MN 55731 
(218) 365-5097 
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First, you can disassemble the entire 
program by using the MS-DOS (or PC- 
DOS) DEBUG utility. Compile your pro- 
gram to a .COM file on disk, run - 
DEBUG on the file, and then use the UV 
command. U stands for unassemble 
(more often called disassemble). The 
.COM file’s first instruction (shown by 
DEBUG at offset hex 100) is a JMP to 
Turbo Pascal’s initialization code, which, 
as far as we know, is always at offset 
2D7C using standard Turbo Pascal v. 
3.01A. 

The size of this initialization code var- 
ies, but it is a minimum of hex 23 bytes. 
Any typed constants are stored here also. 
After the initialization comes the first 
executable instruction, which may be 
part of a subprogram or the main line. If 
you have subprograms (procedures and/ 
or functions), their code appears first— 
not surprising in a one-pass compiler. 
After any subprogram code is the main 
line code. You can continue unassem- 
bling until you reach your program’s end, 
which you can calculate by looking at the 
.COM file’s length before beginning 
DEBUG. 

Suppose you have a big, complex pro- 
gram and you want to look only at a 
small portion of the code. How do you 
pick out that critical portion without un- 
assembling the entire program? Try this 
second approach to exploring Turbo Pas- 
cal’s generated codex 

From Turbo Pascal’s main menu, use 
the W command to make your program 
the work file. Use the F (find) subcom- 
mand of the O (options) command to 
specify a hexadecimal program address. 
Based on our previous discussion, you 
will first want to try an address of 2D9F 
or higher. The Find subcommand causes 
Turbo Pascal to scan through your work 
file, doing a temporary compile while 
looking for the code that occupies the ad- 
dress you enter. : 

After Turbo Pascal points out the Pas- 
cal code for that address, return to the 
main menu and try a higher or lower ad- 
dress, depending on whether Turbo Pas- 
cal found code that was before or after 
the Pascal code you want. Continue in 
this way with trial-and-error addresses 
(if you are a true programmer at heart, 
you'll try a binary search) until you hit 
the Turbo Pascal code you are interested 


in. Then vary the addresses up and down 
slightly (by one or two bytes) until you 
pin down the beginning and ending ad- 
dresses of the statement(s) you want. Jot 
down these addresses. Now compile your 
program into a .COM file and use DE- 
BUG to unassemble the code at that ad- 
dress range. 

Much of the code you see may be calls 
to Turbo Pascal library subroutines 
(which are located between offsets hex 
100 and 2D7C). Since unassembled code 
has no comments to help you, you often 
have to do some subroutine chasing to 
find out what Turbo Pascal does. 

Some code, however, is pretty simple. 
For example, the source statement J :-= 
I (where J is a global integer variable 
and the first variable defined in the pro- 
gram) generates code like this: 


MOV AX,0001 
MOV [0260],AX 


That’s simple enough. Turbo Pascal 
moves a constant 1 into the AX register 
and then moves the contents of the AX 
register into the memory location that is 
allocated to the variable J. (The hex 
number 0260 varies depending on where 
J is defined in relation to other 
variables.) 

Knowing what this code looks like can 
help you isolate other code you are look- 
ing for. You can add a series of simple 
Pascal statements (J -= /, then J := 2, 
etc.) to your program to help you isolate 
exactly the starting and ending points of 
the targeted code between these lines. | 


Tom Rugg is president of 32 Plus Inc., a 
consulting and software development 
company. He has 20 years’ experience in 
applications and systems programming 
and is coauthor with Phil Feldman of 
Turbo Pascal Program Library, pub- 
lished by Que Corp. 


Phil Feldman is chairman of 32 Plus 
Inc. He has 20 years’ experience in sci- 
entific programming and engineering 
and is coauthor with Tom Rugg of 
Turbo Pascal Tips, Tricks, and Traps, 
published by Que Corp. 
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CONFIRMATIONS 

All registrants will receive confirmation of their registration by mail. 
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Never before have so many leaders in the 
software development field gathered for one 
event. SOFTWARE DEVELOPMENT ’88 is 
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programming. The conference is designed to 
teach you practical, advanced techniques you 
can use in your work each day. 

SOFTWARE DEVELOPMENT ’88 is 
brought to you by the publishers of 
COMPUTER LANGUAGE, AI EXPERT 
and UNIX REVIEW. 


This event is created specifically 
for you—the software designer, 
programmer and engineer 


Hundreds of technical innovations, 
language developments and market changes 
drastically affect your programming 
environment each day. The languages, 
techniques and products you use are the tools 
that shape your work. You need to keep them 
sharp. In three short days in sunny California, 
you can keep abreast of a formidable array of 
developments. 

Speakers will address major issues and 
changes in software development like artificial 
intelligence, database design, better 
debugging, and design methodologies. Best of 
all you'll also experience a practical, in-depth 
approach in longer workshop sessions on 
specific techniques, languages, and utilities. 

The cost for this comprehensive 3-day 
event is only $575. Sign up by September 
15th and save $150! The Early Bird 
discounted rate is $425. 


THE MOST COMPREHENSIVE SEMINAR EVER HELD ON 1 


Faculty is a virtual Who’s Who of the 
programming community 


Nearly 100 speakers will address a broad 
range of software development topics. Among 
many other programming luminaries our 
faculty includes: Jon Bentley, Dick Gabriel, 
P.J. Plauger, Esther Dysan, Larry Constan- 
tine, Gary Kildall, Philippe Kahn, John 
Warnock, Alan Kay and Kouichi Kishida. The 
speakers represent a wide spectrum of exper- 
tise in every significant area of programming. 


You can choose from a massive 
array of course offerings 


No other conference offers such a wide 


~range of programming courses. Topics will 
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e Computer e Database Design 


Languages e Tools and Utilities 
e Design e Graphics 
Methodologies ¢C Language Issues 


e Artificial 
Intelligence 


e The Business of 
Programming 


Your registration entitles you to attend six 
one-hour lectures choosing from 30 courses 
led by industry leaders. In addition, you will 
be able to select six longer, in-depth 
workshops from a list of 60 different specific ° 
topics. The workshops will focus on practical 
techniques and the latest developments you 
can apply to your work right away. You won’t 
be just an observer. Lively debates will take 
place in panel discussion and problem-solving 
workshops. 
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Network with sophisticated 
software developers 


Not only will you meet several hundred 
software developers at your advanced level of 
programming sophistication, but you will 
meet the luminaries who will be leading the 
lectures and workshops. You will have the 
opportunity in class, breaks and our hosted 
reception to talk with some of the most 
respected software developers in the industry. 
Nowhere else will you find such an 
opportunity to compare notes, get advice, and 
trade ideas with colleagues at your own 
technical level. 


Development Products Exhibition 


In addition to this impressive array of 
courses, the conference will sponsor an 
Exhibition. Vendors of programming 
.software, services and publications will be 
present. You will have the opportunity to talk 
one-on-one with exhibitors whose high-level 
technical products are focused to your needs. 


Published Proceedings 


Included in your registration fee you will 
receive a bound volume of papers 
summarizing each and every course offered. 
Although you can attend a limited number, 
the proceedings will give you an overview of 
all the conference sessions. You can take this 
informative volume back to your office as a 
reference tool for yourself and your 
colleagues. The proceedings will also include 
contact information for all the exhibitors. 


About the sponsor 


Miller Freeman Publications, publisher of 
COMPUTER LANGUAGE, AI EXPERT 
and UNIX REVIEW, is a leader in the 
technical computer publishing industry. 
These magazines have a well deserved 
reputation for serving the software 
development community with editorial 
content of true technical depth and practical 
application. COMPUTER LANGUAGE 
sponsored the successful C Seminars in 1985 
and 1986 from which SOFTWARE 
DEVELOPMENT ’88 has grown. 


Course selections are assigned on a first come, first served basis. Class sizes are limited based on seating capacity. Participants will select 
their courses from a detailed brochure when registration acceptance is confirmed. 


LECTURES 


Attendees will select six from a choice of 30 lectures led by respected and 
experienced software development leaders. What follows is only a partial listing of 
speakers who have agreed to participate in SOFTWARE DEVELOPMENT ’88: 


Jon Bentley 

Keynote Address 

Jon Bentley, author of the enormously 
popular Programming Pearls column in 
Communications of the ACM since 1983, is a 
member of the technical staff in the 
Computing Science Research Center at 
AT&T Bell Labs. 


Janet Chin 

Computer Graphics Standards 
—Better late than never? 

Janet Chin, recognized as one of the leading 
authorities on graphics standards, and a mem- 
ber of national and international standards 
boards, is president of Chin Associates. 


Larry Constantine 

The Evolution of Structured Design 
Larry Constantine is currently revising 
his landmark book, Structured Design, first 
published in 1975, and is a management 
consultant on organizational problems. 


Esther Dyson 

Artificial Intelligence and the Future 
of Programming 

Esther Dyson is one of the computer 
industry’s most insightful analysts, and the 
editor and publisher of Release 1.0, a highly 
respected computer industry newsletter. 


Richard Gabriel 

LISP as a General Development 
Language 

Richard Gabriel, originator of Common 
LISP, is president of Lucid Inc., a leading 
LISP company, and very active in the interna- 
tional effort to standardize Common LISP. 


Philippe Kahn 

The Future of Language Development 
Philippe Kahn is founder and president of 
Borland International, vendor of numerous 


language products, including Turbo Pascal, 
Turbo BASIC, Turbo PROLOG and Turbo C. 


Alan Kay 

Smalltalk and the Future of Object- 
Oriented Languages 

Alan Kay, often referred to as the ‘‘father of 
the personal computer,” developed the 
object-oriented language Smalltalk and is now 
working with children, computers, and 
learning at Apple. 


Tom Kehler 

Knowledge Processing: Technology 
and Applications 

Tom Kehler is the Chairman and CEO of 
IntelliCorp, one of the “Big Four’ AI compa- 
nies, suppliers of KEE, a high-end, integrated, 
knowledge engineering environment. 


Gary Kildall 

Overview of CD ROM Technology 
Gary Kildall, founder of Digital Research Inc. 
and developer of the CP/M operating system 
is currently working on the commercial 
development of CD ROM technology at his 
company, KnowledgeSet Corp. 


Kouichi Kishida 

Technology Transfer 

Kouichi Kishida, one of the fathers of the 
software industry in Japan, and one of the 
founders of SIGMA, a software tools 
development project funded by the Japanese 
government, is an expert in the areas of 
technology transfer and networking. 


Charles Moore 

Forth Language Issues 

Charles Moore is the inventor of the Forth 
language, designer of the NC40165 Forth 
microprocessor, and owner of Computer 
Cowboys. 


P.J. Plauger 


Design Methodologies 

P.J. Plauger has coauthored several popular 
textbooks, including The Elements of 
Programming Style and Software Tools in Pascal, 
is secretary of the ANSI C Standard 
committee, and president of Whitesmiths 
Ltd. 


Jack Purdum 

How to Write “Good” C Functions 
Jack Purdum is a, noted author of numerous C 
books, including CRrogramming Guide and the 
newly released Guide to the C Standard Library, 
and is president of Ecosoft. 


Robert Ward 

C Debugging 

Robert Ward runs the C Users’ Group, the 
largest single source of public domain C code 
in the world, and has just published Debugging 
C. 


John Warnock 
Graphics and PostScript 


John Warnock, one of the designers of the 
PostScript page description language, is 
president and co-founder of Adobe Systems. 


Jim Warren 

Tomorrow’s Software Systems & Issues 
Jim Warren, one of the founders of The 
People’s Computer Company and founder of 
the West Coast Computer Faire and The 
Silicon Gulch Gazette, now shares his insights 
into the microcomputer industry through 
articles and columns. 


WORKSHOPS 


Attendees will select six 


_ workshops. The following 


is a preliminary list: 


cede at Languages: 
Developing with ACTOR 
Intro to Ada 

Ada tasking 

Programming in COBOL 85 
Special-purpose languages 
Snobol tutorial 

Modula-2 primer 

Pascal tutorial 


Design Methodologies: 

Configuration management 
for PC and VAX projects 

Engineering large software 
systems and environments 

Structured design workshop 

Upper CASE 

Using insight routines 

User interface design 

Prototyping 

CASE and structured design 

Optimization 

Object-oriented programming 

New design methodologies 


Artificial Intelligence: 
Building systems with LISP 
Expert systems shells for PCs 
Parallel processor programming 
Prolog tutorial (I & II) 
LISP tutorial (I & II) 
Interfacing AI with SQL 
Al and the 80386 
Knowledge-based systems 
Interfacing conventional 
languages with AI shells 
Robotics 


Database Design: 

Computer security workshop 

Evaluating hardware, software 
for DBMS applications 

Pick operating system 

Introduction to SQL 

Tools and Utilities: 

Commercial development tools 

CD ROMs workshop 

Device drivers 

Decision Tables 

Graphics: 

3D Graphics on PCs 

Micrographics and print 

PostScript workshop 

Graphics algorithms 


C Language Issues: 
Advanced graphics in C+ + 
Introduction to C+ + 

C debugging workshop 

C tutorial (I & II) 

C Interpreter panel debate 
C Compiler panel discussion 
C efficiency and portability 
C tools for productivity 
Object-oriented C 


Business of Programming: 
Intellectual property law 

RISC 

Distributed file system 

OS/2 


IMPORTANT CONFERENCE DATES TO REMEMBER 


December 31 


Deadline for regular registration 


| February 16, 1988 On-site registration begins, 3pm, Ramada Renaissance Hotel 


REGISTRATION INFORMATION 

Register By Phone: Call Laurie Mansur at (415) 397-1881 for 
immediate registration. Registration hours are 9am to 4pm, PST, 
Monday-Friday. 

Register By Mail: Complete the registration form, detach and mail 
to the address below. 


DISCOUNTS 5 
The first registrant from a company pays full-price and each 
additional registrant receives.a 10% discount. The early bird” 


discounted price qualifies for this offer if all registrants in the group 


are paid in full by September 15. 


REGISTRATION FEE 

Registration fee includes admission to six lectures and six 
workshops, all course materials, admission to the Development 
Products Exhibition, refreshment breaks, Welcome Reception and a 
bound copy of the 200-page published proceedings, which 
includes summaries of all lectures and workshops presented. 


The registration fee must be paid prior to the event. Send 
payment with registration to ensure priority status. Government 
purchase orders, checks drawn on U.S. banks, international 
money orders, traveler’s checks, VISA, Master Card, American 
Express, or bank transfers (in U.S. funds) will be accepted. 


Cut here and return entire lower portion. 


C) Please register me to attend Software Development 
’88. | have corrected the address information on the 


label where necessary. 


OTHERS REGISTERING 
Name 
Title 
Name 
Title 
Name 
Title 
Name 
Title 
Name 
Title 


SOFTWARE DEVELOPMENT ’88 
Miller Freeman Publications 
Seminar Department 

‘500 Howard Street 

San Francisco, CA 94105 


od 
(=) 
Type of Registration 
O Early Bird $425 (by 9/15/87) 
DO Single $575 (from 9/16- 12/31/87) 
O Late $695 (from 1/1-2/17/88) 
O Multiple (10% discount each additional registrant) 


O Please send me information on exhibiting my company’s 
product at the Development Products Exhibition. 


Method of Payment: 
O Check Enclosed (make payable to Miller Freeman Publications) 
O Bill My Credit Card 

___—VISA ____Mastercard ____ American Express 


(Gh eab ch TUN a a ED: 


Signature 
0 Bill My Company 


Please return to SD’88, Miller Freeman Publications, Seminar 
Department, 500 Howard Street, San Francisco, CA 94105. 


Bulk Rate 
U.S. Postage 


PAID 
Miller Freeman Publications, Inc. 


We're Programmer's Connec- 
tion, your best one-stop 
source for quality program: 
mer’s development tools for 
IBM personal computers and 
compatibles. Here are some 
important facts you should 
know about us and other 
dealers in our industry. 


FACT: 

FREE Shipping. Shipping to US. 
customers is FREE via UPS Ground. 
If you want your order shipped via 
an express Service, we'll only charge 
you the shipping carrier's standard 
rate with no special fees. Some 
dealers charge extra for shipping 
and then add rush charges for ship- 
ping via express services. Others 
may advertise “free” shipping but 
make up for it by charging extra 
handling fees. 


FACT: 

Credit Cards. We'll charge your 
credit card only when we actually 
ship your order. Some dealers would 
charge your credit card at the time 
you place your order. This could 
leave you waiting for your shipment 
for weeks or months while they use 
your money interest-free. 


FACT: 

Discounts. We discountall software 
products — even special order 
items. Every product in our adver- 
tised price list is shown with its list 
price and discounted price. We want 
you to know exactly how much you'll 
save on every product. We don’t try 
to fool you by discounting some 
products and charging full retail for 
others. 


FACT: 

Consistent Prices. We extend the 
same current prices to every cus- 
tomer regardless of where they see 
our ad. Some dealers vary prices in 
different ads and then ask you to 
mention which one you saw. This 
technique allows them to charge 
you the highest prices possible. 


FACT: 

No Hidden Charges. The discount 
prices you see on the next two 
Pages are all you pay. We don’t 
charge extra for UPS Ground ship- 
ping, credit cards, COD orders, pur- 
chase orders, sales tax (except Ohio) 
or special handling (except for non- 
Canadian international orders). 


FACT: 

Guarantees. We offer FREE 30-day 
no-risk return guarantees and 30- 
day evaluation periods on most of 
our products. Some dealers have 
no return options while others often 
charge restocking fees of 15% or 
more. 


FACT: 

Quality Products. Our productline 
consists of hundreds of high quality 
software development tools speci- 
fically for IBM Personal Computers 
and compatibles. While some deal- 
ers try to carry every software prod- 
uct ever written, we carry only those 
that meet our very high standards 
for quality and value. 

FACT: 

Latest Versions. The products we 
carry are the latest versions and 
come with the same manufacturer's 
technical supportas if buying direct. 
While some dealers may participate 
in the software gray market, we're 
authorized to sell every product we 
carry. 

FACT: 

Large Inventory. We have one of 
the largest inventories of program- 
mer’s development products in the 
industry. Most orders are shipped 
within 24 hours. And ifwe don‘thave 
a product in stock, we'll get it for you 
fast. 


Turn the page for our product list and ordering information. 
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FACT: 

Meticulous Packaging. We'll give 
your shipment the extra protection 
needed to reach you in the best 
possible condition. First we'll pro- 
tect your products from moisture by 
wrapping them in plastic. Then we'll 
insulate your box with high quality 
bubble-wrapping instead of the 
messy styrofoam chips that many 
other dealers use. Finally, we'll 
double-tape your box for extra 
strength. 


FACT: 

Independence. Since we're not di- 
rectly affiliated with any software 
publisher or developer, we can give 
you sound, unbiased advice. Unlike 
some dealers who have a special 
interest in promoting only certain 
products, we'll give you an objective 
look at the products we carry. 


FACT: 


Noncommissioned Staff. Our 


courteous sales staffis always ready-—~ 


to help you. And if you aren't sure 
about your needs, our knowledge- 
able technical staff can give you 
sound, objective advice. Because 
they are noncommissioned, you 
won't be pressured into making a 
purchase. 


As you can see, we're different 
from the other dealers in our 
industry. Our customers keep 
coming back because we con- 
sistently provide the highest 
quality service and the lowest 
prices. So call us today and 
experience the differences for 
yourself. 


ai-expert systems 
1st-CLASS by Programs in Motion ..........+++-4 
EXSYS Development Software by EXSYS. . 
EXSYS Runtime System................ 
Logic-Line Series A// varieties by Thunderstone....... 


ai- lisp language 
GCLISP Golden Common LISP by Gold Hill .......... 
GCLISP 286 Developer by Gold Hill ..... 
Microsoft LISP Common LISP...........+ 
QNIAL Combines LISP & APL by MAL Systems . F 
TransLISP PLUS from Solution Systems ........++4+ 
ai- prolog language 
Arity Combination Package ..................005 
Expert System Development Pkg . $ 
File Interchange Toolkit.......... 
PROLOG Compiler & Interpreter . 
Screen Design Toolkit ........ 
SOL Development Package 
Arity PROLOG Interpreter ... 
Arity Standard Prolog ...... 
LPA microPROLOG A// Varieties . 
MPROLOG Language Primer LOG/CWARE . 
MPROLOG P500 hy LOGICWARE ....... 
MPROLOG P550 ty LOGICWARE . . 
Turbo PROLOG dy Borland Intl....... i 
Turbo PROLOG Toolbox sy Borland Int)............. 


ai - smalltalk language 


Small talc /Vidva sects cls cuvtagsscrsseoet toi «ay See eee eco sis 
EGA/VGA Color Option . ‘ 
Goodies Diskette ...... a 
Smalltalk/Comm ..................2.0008 


ai-texas instruments 


Arborist Decision Tree Software .............. New 

PC Scheme Lisp............. 

Personal Consultant Easy . . 

Personal Consultant Image . . . 

Personal Consultant Online . . 

Personal Consultant Plus .... 

Personal Consultant Runtime .................... 

da language 

AdaVantage Ly Meridian Software Systems . . 
AdaVantage Utility Packages .......... 
DOS Environment Package .... 

Janus/ADA C Pak by R&R Software . 


Janus/ADA D Pak by R&R Software. 
Janus/ADA ED Pak by R&R Software.............. 
apl language 

ABU SBLUS UPC DypS TSC cinrerctetetelotelefaeds cin caress ois) sia) 
APL*PLUS/PC Spreadsheet Mgr by S7SC .. =A 
APL*PLUS/PC Tools Vol 1 by STSC .. 
APL*PLUS/PC Tools Vol 2 by STSC . 
ATLAS*GRAPHICS by STSC ....... 
Financial/Statistical Library by S7SC . 
Pocket APL by STSC ........... bys 
STATGRAPHICS by STSC «2.6.0... cee eee eee 


assembly language 


386 ASM/LINK Cross Asm by Phar lap ........... 
8088 Assembler w/Z-80 Translator by 2500 AD...... 
ASMLIB Function Library by BC Assoc.......... 

asmTREE 8-Tree Dev System by BC Assoc .. 
Cross Assemblers Various by 2500 AD ..... 
EZASM by C Source ........ccecevecevevees New 
Microsoft Macro Assembler .... New Version 
Norton Utilities by Peter Worton ..........0-. 0. eae 
Norton Utilities (Advanced) .... 
Turbo Debugger by Speedware . . 
Turbo Editasm by Speedware ............-..000-- 
Visible Computer: 80286 ................... New 
Visible Computer: 8088 by Software Masters ........ 


basic language 


87 Software Pak by Hauppauge ...........0..000e 
db/Lib for QuickBASIC by AJS Publishing . New 
EXIM Services Toolkit by EX/M ... 
Finally by Komputerwerks ...... 
MACH 2 by Micro Help ........ 0. cece cece eens 
Microsoft QuickBASIC........... $20 Rebate Offer 
QBase Relational Database by Crescent ........ New 
Quick-Tools by BC Associates....... 
QuickPak by Crescent Software ....... 
Scientific Subroutine Library by Peerless . 
Screen Sculptor by Software Bottling ... 
Stay-Res by MicroHelp.......... 
True Basic w/Run-time . 


Turbo BASIC Compiler by Borland Int! ............. 


blaise products 


ASYNCH MANAGER Specify C or Pascal ........... 
CATO OUS PLUS aioe ose ctagstemteperer onaoorsrel occ leicrelete 
LIGHT TOOLS for Datalight C. 
PASCAL TOOLS .......... 


PASCAL TOOLS & TOOLS 2. 
RUNOFF Text Formatter . 
TURBO ASYNCH PLUS . 
TURBO C TOOLS 


borland products 
EUREKA Equation Solver ............eceeeeeeeee 
Reflex & Reflex Workshop .. . oe 
Reflex Data Base System .. ote 
RefiexiWoOrkshopictsscncss 2. ste cucisttelepen whee cea 


List Ours 
495 399 
395 309 
600 469 
CALL CALL 
495 CALL 
1190 CALL 
250 149 
CALL CALL 
195 125 
1095 979 
295 229 
50 44 
650 569 
50 44 
295 229 
295 229 
95 77 
CALL CALL 
50 45 
495 395 
220 175 
100 64 
100 «64 
9984 
50 45 
50 45 
50 45 
595 519 


Sidekick & Teavonesi Sidehick’s:ey poms oct erase 


Superkey 
Turbo BASIC Compiler........ 
Turbo BASIC Database Toolbox . 
Turbo BASIC Editor Toolbox... . 
Turbo BASIC Telecom Toolbox........... 
Turbo C Compiler (Cal! for support products) . 
Turbo Database Toolbox................ 
Turbo Editor Toolbox ..... 
Turbo Gameworks Toolbox . 
Turbo Graphix Toolbox... . 
Turbo Jumbo Pack. . 
Turho|Lightning).<): <ci.20-teecamisisc 
Turbo PASCAL Numerical Methods To : 
Turbo PASCAL and Tutor..............- 

Turbo PASCAL ....... 

Turbo Tutor.......... 
Turbo PROLOG Compiler . . 
Turbo PROLOG Toolbox . . . 


ec compilers 


C86PLUS by Computer Innovations... 
DeSmet C w/Debugger & Large case . 
DeSmet C w/Debugger only...... 
Eco-C Complete System by Ecosoft .. . 
Lattice C Compiler vers. 3.2 from Lattice 
Mark Williams Let's C w/csd....... 
Microsoft C Compiler w/CodeView 
Microsoft QuickC Compiler ...... 
Optimum-C dy Datalight ...:. 
Turbo C Compiler by Borland 


New version 
. New 


Uniware 68000/10/20 Cross Compiler by SDS ...... 


c interpreters 
C-terp by Gimpel, Specify compiler . 
C Trainer with Book by Catalytix .. . 
Instant C by Rational Systems....... 
Introducing C by Computer Innovations 
Run/C by Age of Reason .......... 
Run/C Professional by Age of Reason 
c utilities 
C++ by Guidelines w/version 1.1 kernel . 
Csharp Realtime Toolkit by Systems Guild 
c-tree & r-tree Combo dy FairCom ... 
c-tree /SAM File Manager ..... 
t-tree Report Generator ..... 
Data Windows by Magus Inc . 
with Source Code ..........0.+4.5 
dBx dBASE to C Translator by Desktop Al 
with Source Code ...........+.4++ 
Flash-up Windows hy Software Bottling . 
GraphiC Color version by Sci Endeavors. . 
GRAFLIB dy Sutrasoft .............. 
HALO Graphics hy Media Cybernetics . 
HALO Development Pkg for Microsoft . 
The HAMMER by OES Systems ....... 
PANEL Forms Management by Roundhill . 
PANEL/TC for Turbo C by Roundhill ... . 
PANEL Plus Sy Roundhill .......... 
PC Lint by Gimpel Software 
PLOTHP by Sutrasoft............... 
RTC PLUS Fortran to C by Cobalt Blue .... 
Scientific Subroutine Library by Peerless .. 
TE Text Editor source by Sub Systems .... 
Vitamin C by Creative Programming .... 
VC Screen Forms Designer..... 
Zview by Data Mgmt Consultants . . 


cobol language 

COBORS BIB: Flext: sie, sicrs.s o\etalalaye ole 24,0) jniesnseve vcd 
FPLIB for Realia COBOL by BC Associates........... 
Micro Focus COBOL See Micro Focus Section 
Microsoft COBOL See Microsoft Section 


New Version 


New Version 


‘New 


PCDT dy Pro-Code New 
Realia COBOL with RealMENU . . New Version 
Realia COBOL .............. . New Version 

ReplGlGSires sections ass 


RM/COBOL dy Ryan-McFarland .. . 
RM/COBOL 85 by Ryan-McFarland ae 
SCREENIO Ay Worcom ............ New 
screenplay for COBOL by Flexus ...............+.. 


css products 


Combo Package by Custom Software Systems .... 
PC/SPELL Spelling Checker............ 
PC/TOOLS UWIX-like Utilities . er 
PO/NUVNEi One ape caunates siesisenpciaeste 


debuggers & pratilers: 


386 DEBUG Cross Debugger by Phar Lap . 
Advanced Trace-86 by Morgan Computing - 
Codesmith-86 by Visual 08 Robe BCR SO 
DSD87 by Soft Advances . 
MiniProbe by Atron 
Periscope | with Board hy Periscope . ats 
Periscope Il with WMI Breakout Switch - 
Periscope II-X Software only ......... 
Periscope III 8 MHz version .. . 
Periscope Ill 70 MHz version ........... 
The PROFILER with Source Code by DWB...... 
TURBOsmith Source debugger for Turbo Pascal . . 
The WATCHER Profiler by Stony Brook............. 
disk utilities 

Back-It by Gazelle Systems ............0-0e0e0ee 
Disk Optimizer by Softlogic Systems... . 
FASTBACK by 5th Generation Systems . . 
Veache by Golden Bow Systems ....... 
Vopt by Golden Bow Systems .... 
Vfeature by Golden Bow Systems ........ 
Vfeature Deluxe by Golden Bow Systems ....... 
XenaCopy-PC by XenoSoft .............0 eevee 


New 


dos utilities 


Command Plus by ESP Software ................- 
FANSI-CONSOLE by Hersey Micro . aS 
MicroHelp Utilities by MicroHelp .... 
Norton Commander Sy Peter Warton .... 
OPAL Shell Language hy Software Factory 
Q-DOS Il by Gazelle Systems ........ Be 
Taskview by Sunny Hill Software ..............++. 


essential products 


CiUtility:Libraryias eee. eee reraaerinie s+ 
Essential Comm Library with Debugger . . de 
Essential Comm Library Software Only . 
Breakout Debugger Only Any /anguage . is 
Essential Graphtes: ¢ :.:sc:<0%1s «1.1 -1as hence: 


forth language 


CFORTH Wative Code Compiler by LMI ............- 
Forth/83 Metacompiler Specify Target . . us 
PC/Forth by Laboratory Microsystems... 
PC/Forth+ by Laboratory Microsystems . 
Advanced Color Graphics Support . 
Enhanced Graphics Support ...... 
Intel 8087 Support .......... 
Interactive Symbolic Debugger. . 
Native Code Optimizer........ 
Software Floating Point . 
UR/Forth by LM/.......... ao 
Object Module Libraries...................0.. 


fortran language 
50 MORE: FORTRAN hy Peerless Scientific ......... 
ACS Time Series by Alpha Computer Service ........ 
AUTOMATED PROGRAMMER hy KGK Automated New 
Essential Graphics by Essential Software ........... 
For-Winds by Alpha Computer Service .. 
Forlib-Plus by Alpha Computer Service . . 
FORTLIB Ay Sutrasoft .............. 
FORTRAN Addendum dy /mpulse Engr .. 
FORTRAN Addenda hy /mpulse Engr... . 
GRAFLIB dy Sutrasoft ............ 
HALO Graphics by Media Cybernetics . 
1/0 PRO w/No Limit Library by MEF . 
Microcompatibles Combo Package .. . 
Grafmatic’ <372%creterssioeleretisa 
Blotimatichs eters. aria ce: elelocessrotageisee 
Microsoft FORTRAN w/CodeView ..... 
No Limit Library by MEF Environmental. . 
Numerical Analyst by MAGUS......... 
PANEL by Roundhill Computer Systems . . 
PLOTHP by Sutrasoft ... 00.60.0240 
RM/FORTRAN by Ayan-McFarland..... 
RTC PLUS Fortran to C by Cobalt Blue .. 
Scientific Subroutine Lib by Peerless . 
Statistician by Alpha Computer Service 
Statlib.GL: by Peerless ....... 6. cece 
Statlib. TSF: by Peerless ............46 
Strings & Things by Alpha Computer Service ......... 


greenleaf products 


Greenleaf Comm Library .....................0. 
Greenleaf Data Windows Library 

with Source Code... Bi 
Greenleatifunctionsiyac.t-ieter.-1.cneaieaicae tenes 


help utilities 

HELP/Control by MDS ....... 02.0. c cece eee e cues 
On-line Help from Opt-Tech oy 
SoftScreen/HELP by Dialectic Systems ...........- 


lattice products 


Lattice C Compiler ver 3.2 from Lattice............. 
with Library Source Code ........... 
C Cross Reference Generator. 
with Source Code.............. 
C-Food Smorgasbord Function aay: 
with Source Code mera 
C-Sprite Source Leve/ Debugger . 
Curses Screen Manager ...... 
with Source Code ....... 
dBC Specify dBC II or dBC Il. 
with Source Code ..... 
OBC IE Blusei 2. -.-...<:. 
with Source Code . 
LMK Make Facility 
RPG Il Combo Al three items below . 
RPG I! Compiler Wo Royalties... . 
RPG Il SEU Screen Entry Utility . 
mort Mergers as seieniene 
RPG Il Screen Design Aid Utility . . 
SecretDisk File Encryption Utility . . 
SideTalk Resident Communications . . . 
SSP/PC Scientific Subroutine Library . 
Text Management Utilities ........... 
TopView Toolbasket Function Library . ‘5 
WIURSOULCO\C ODS foresaw 'mo:0,0.<.210.019 tee ayoeantnn 


80 
15 
59 
715 
99 
70 
80 


185 
250 
185 
125 
250 


300 
750 
150 
250 
100 
200 
100 
100 
100 
100 
350 
500 


125 
495 
CALL 
250 
90 
70 
125 
95 
165 


metagraphics products 


LightWINDOW/C for Datalight C ...............4. 
FontWINDOW ............. 5 


MetaWINDOW Wo Royalties . 
MetaWINDOW/PLUS ....... 


micro focus products 


Micro Focus Level I! COBOL w/Animator........... 
Level NCOBOM ects ares 2 eek oe 


Micro Focus Level I! COBOL/ET for UNIX . 
Micro Focus Personal COBOL .......... 
Micro Focus Professional COBOL 
Micro Focus VS COBOL/XENIX 


Micro Focus Support Products: 
COBOL/IO Ad hoc Report Writer .............45 
COBOL/IO for DOS 3.X Networks . . se 


EORMS: 25205 rsactesstse es rertecraine ae 
SQURCEWRITER oc scasctetscta terse asics otocloccterarctoke 
microport products 
System V/386 Combination . . .. New 
386 Runtime System ............. New 
386 Software Development System . . New 
Text Preparation System .......... New 
386 Unlimited License Kit ............. New 


DOSMerge386 Aun DOS and UNIX together ..... New 
System V/AT Combination............. 
AT Runtime System ............ 
AT Software Development System . 
Text Preparation System ........ 
AT Unlimited License Kit .......... ys 
DOSMerge286 Run DOS and UNIX together ..... New 


microsoft products 


Microsoft BASIC Compiler for XFMIX ............-+ 
Microsoft BASIC Interpreter for XEMIX . . 
Microsoft C Compiler w/CodeView...... New Version 
Microsoft COBOL Compiler with COBOL Tools . a 
TL OPIXENIX Paaatesstapcicyaterersthe Sets etwiss aiate ors avai sis ie share 
Microsoft FORTRAN Optimizing Compiler/CodeView . . . 
Microsoft FORTRAN for XEMIX...........0 eee eens 
Microsoft Learning DOS ...... SE 
Microsoft LISP Common LISP...........+ 
Microsoft MACH 10 with Mouse & Windows Be 
Microsoft MACH 10 Board only ..............-005 
Microsoft Macro Assembler ...... . New Version 
Microsoft Mouse for /BM PS/2 .........00005 New 
Microsoft Mouse Bus Version ..... 
Microsoft Mouse Serial Version . 
Microsoft muMath /acludes muS/MP . . 
Microsoft Pascal Compiler......... 
LOTEXEM Agha dusclerateiets 
Microsoft QuickBASIC . 
Microsoft QuickC. . . 
Microsoft Sort... 
Microsoft Windows ............ 
Microsoft Windows Development Kit . ane 
IMicrosOftiWOlds)..an-ccte citersivre(e efoicieynin sssinsale, ols-0s 


modula-2 language 


2 Mee New 


EXE2LNK MASM Interface by PMI ..........++ New 
Macro2 Macro preprocessor by PMI .. .. New 
ModBase by PM/ .............0+0- New 


MODULA-2 Apprentice Pkg by LOGITECH 
MODULA-2 Magic Pkg by LOGITECH ....... 
MODULA-2 ROM Pkg & Cross RT Debugger . . 
MODULA-2 Window Pkg by LOGITECH...... 
MODULA-2 Wizard's Pkg by LOGITECH op 
Repertoire Ay PAN enc eraisse a0 oie etoieiein Ssicis sizaseroinie’s 


mouse products 


LOGIMOUSE BUS with PLUS Pkg by LOGITECH ...... 
with PLUS & PC Paintbrush. ........+.0006- C3 
with PLUS & CAD Software... 
with PLUS & CAD & Paint. . 

LOGIMOUSE C7 with PLUS Pkg, Specify Connector... . 
with PLUS & PC Paintbrush. .... on 
with PLUS & CAD Software... ah 
with PLUS & CAD & Paint...... 0.00 cece eee 

Microsoft Mouse See Microsoft Section 


other languages 


ACTOR by Whitewater Group ....... .. New 
CCS MUMPS Single-User by MGlobal . . RE 
CCS MUMPS Single-User Multi-Tasking . 
CCS MUMPS Multi-User ..............54- 
Marshal Pascal by Marshal Language Systems . 
Pascal-2 by Oregon Software .........-+.++ 
Personal REXX by Mansfield Software ~ 
SNOBOL4+ by Catspaw .... cc. c cece eee eee ees 


other products 


Carbon Copy by Meridian Technology .......... New 
Dan Bricklin's Demo Pgm by Software Garden ....... 
Dan Bricklin's Demo Tutorial .................. 


Fast Forward by Mark Williams ......... New 
First Publisher with Mouse from Logitech . . New 
Informix A// Varieties by Informix ......... 000.00 ee 
Instant Replay by Vostradamus .......00 eee eee eee 
Mace Utilities Pau/ Mace Software ............ New 


MKS Toolkit w/vi Editor by MKS ....... New Version 
MicroTEX Typesetting from Addison Wesley ......... 
Net-Tools by BC Associates ........ z me 
OPT-Tech Sort by Opt-Tech Data Proc 
PC/TOOLS Ay Custom Software..... os 
Screen Machine by MicroHelp ...........0.000005 


phoenix products 


Pasm86 Macro Assembler version 2.0. . 
Pdisk Hard Disk & Backup Utility . 
Pfantasy Pac Phoenix Combo ... 
Pfinish Execution Profiler ...... 
Pfix8Gplus Symbolic Debugger . . 
PforCe Specify C Compiler ........... 
PforCe++ Specify C Compiler and C++ . . 
Plink8Gplus Qverlay Linker ........... 
Pmaker Make Utility...... 
Pmate Macro Text Editor . 
Pre-C Lint Utility ...........045 ws 
Ptel Binary File Transfer Program ..........+.-2+-+ 


polytron products 


PolyBoost 7he Software Accelerator .............-- 
PolyDesk Ill............ 
PolyDesk Ill Archivist .... 
PolyDesk III Cryptographer . . a 
PolyDesk Ill Talk....................0 0020 
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PolyLibrarian Library Manager . . 
PolyLibrarian II Library Manager . 
PolyMake UM/X-like Make Facility 
BolyShellems en asec 
Polytron C Beautifier ............. 
PolyXREF Complete Cross Ref Utility . 
PolyXREF One /anguage only ......... 
PVCS Corporate Version Control System . 
PVCS Personal 


program mgmt utilities 
Interactive EASYFLOW dy Haventree .............. 
PrintO by Software Directions....... 1S 
Quilt Computing Combo Package . . 
QMake Program Rebuild Utility........ 
SRMS Software Revision Mgmt System . 
Source Print hy A/debaran Labs ......... 
TLIB Version Control System by Burton . . a 
Tree Diagrammer by A/debaran Labs .............. 


raima products 


dbQUERY Single-User Query Utility.............008 
Single-User with Source Code .. . es 
Multi-User... 20000200000. 
Multi-User with Source Code . . 
dbVISTA Single-User DBMS .... 
Single-User with Source Code . 
MUEEUSEI retsceoieis.a1sisictepble « 


Operating System Specify XT or AT. 

Text Processing Package ........ 
ytixthy SCO rice cio cris cisicla aipiere 
SCO Professional 7-2-3 Workalike for XENIX. . ts 
CTHNS. CLILG [a pdoaeopedecsedsddor: Senean sn 


softcraft products 


Btrieve /SAM Mgr with No Royalties ........+.0.005 
Xtrieve Query Utility... 2.60.6. 0 05 éo 
Report Option for Xtrieve 

Btrieve/N for Networks ... 
Mtrieve Nee cisiss.,creicherasecareiale 


text editors 


Brief & dBrief Combo from Solution Systems ........ 
(if Sase noedadedine sornaone soar 
dBrief Customizes Brief for dBASE Ill. . 

Epsilon Emacs-like editor by Lugaru..... 

KEDIT by Mansfield Software .... . 

Micro/SPF hy Phaser Systems .. 

Microsoft Word ................- 

PC/VI by Custom Software Systems ... . 

SPF/PC by Command Technology Corp . . 

Vedit Plus hy CompuView.......... 


turbo paseal utilities 


ALICE /nterpreter by Software Channels ...........4 
DOS/BIOS & Mouse Tools Ay Quinn-Curtis . es 
Flash-up Windows by Software Bottling ... 
MACH 2 for Turbo Pascal by Micro Help . 
MetraByte D/A Tools by Quinn-Curtis . . . 
Science & Engrg Tools by Quinn-Curtis . . 
Screen Sculptor by Software Bottling . 
Speed Screen by Software Bottling . 
System Builder by Royal American ... 

IMPEX Query Utility.......... 

Report Builder.................. 
TDebugPLUS Ay TurboPower Software .. 
Tmark by Tangent Systems ........... 
Turbo EXTENDER by TurboPower Software . 
Turbo OPTIMIZER by TurboPower ..... 
Turbo OPTIMIZER with Source Code . 
Turbo Professional by Sunny Hill... . 
Turbo.ASM dy BC Associates ..+ .. 
TurboHALO from IMS/ .... a 
TurboPower Utilities by TurboPower 
TurboRef by Gracon Services ........... 
TURBOsmith Source Debugger by Visual Age . a 
Universal Graphics Library by Quinn-Curtis .......... 


wendin products 


Operating System Toolbox ..................000 
PCNX Operating system ..... 
PCVMS Similar to VAX/VMS .. . 
Wendin-DOS Multitasking DOS . . 
XTC Text Editor w/Pascal source . . 


xenix/unix products 


Btrieve /SAM File Mor by SoftCraft ...............5- 
C-terp by Gimpel, Specify compiler .. . és 
c-tree SAM Mor by FairlCom ....... 
dBx with Library Source by Desktop Al. 
Desqview from Quarterdeck ...... 
DOSIX Console Version by Data Basi 
DOSIX User Version by Data Basics .... hs 
Informix A// Varieties by Informix ..........+..0+5- 
Micro Focus Products See Micro Focus Section 
Microport Products See Microport Section 
Microsoft Products See Microsoft Section 
PANEL Plus by Roundhill Computer Systems ......... 
REAL-TOOLS Binary Version by PCT ...... i 
Library Source Version .......... 
Complete Source Version .... 
RM/COBOL by Ryan-McFarland . . . a, 
RM/FORTRAN dy Ayan-McFarland...............- 
SCO Products See SCO Section 
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LOWEST PRICES 
Due to printing lead times, some of our current 
prices may differ from those shown here. Call for 
latest pricing. 

FREE SHIPPING 
Orders within the USA (including Alaska & Hawaii) 
are shipped FREE via UPS. Express shipping is 
available at the shipping carrier's standard rate 
with no rush fees or handling charges. To avoid 
delays when ordering by mail, please call first to 
determine the exact cost of express shipping. 

CREDIT CARDS 
VISA and MasterCard are accepted at no extra 
cost. Your card is charged when your order is 
shipped. Mail orders please include credit card 
expiration date and authorized signature. 

CODs AND POs 
CODs and Purchase Orders are accepted at no 
extra cost. No personal checks are accepted on 
COD orders. POs with net 30-day terms (with initial 
minimum order of $100) are available to qualified 
US accounts only. 

SALES TAX 
Orders outside of Ohio are not charged state sales 
tax. Ohio customers please add 6% Ohio tax or 
provide proof of tax-exemption. 
INTERNATIONAL ORDERS 

Shipping charges for International and Canadian 
orders are based on the shipping carrier's standard 
rate. Since rates vary between carriers, please call 
or write for the exact cost. International orders 
(except Canada), please include an additional $10 
for export preparation. All payments must be made 
with US funds drawn ona US bank. Please include 
your telephone number when ordering 
Due to government regulations, we cannot ship to 


all countries. 

VOLUME ORDERS 
Volume orders may-qualify for additional discounts. 
Call us for special pricing. 

SOUND ADVICE 
Our knowledgeable technical staff can answer 
technical questions, assist in comparing products 
and send you detailed product information tailored 
to your needs. 
30-DAY GUARANTEE : 
Most of our products (excluding books) come with 
a 30-day documentation evaluation period or a 
30-day return guarantee. Please note that some 
manufacturers restrict us from offering guarantees 
on their products. Call for more information. 
MAIL ORDERS 
Please include your telephone number on all mail 
orders. Be sure to specify computer, operating 
system and any applicable compiler or hardware 
interface(s). Send mail orders to: 
Programmer's Connection 
Order Processing Department 
136 Sunnyside Street 
Hartville, OH 44632 


USA cet eat nee 800-336-1166 
CANADA .....................-.... 800-225-1166 
OHIO & ALASKA (Collect) 216-877-3781 
TELEX ; 9102406879 
EASYLINK ... 62806530 
INTERNATIONAL ............ 216-877-3781 


CUSTOMER SERVICE ... 216-877-1110 
Hours: Weekdays 8:30 AM to 8:00 PM EST. 
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Scicalc’s 
capabilities 
can extend the 


power of Turbo Pascal— 
and be applied to other 


languages as well 


ince the first 
days of the 
computer revo- 
lution, comput- 


ers have been used to program answers 
to a wide variety of mathematical prob- 
lems—from spacecraft trajectories to so- 
lutions of pi to near-infinite precision. 
During most of this period, programs for 
mathematical problems were written in 
FORTRAN or machine language. Most 
of the other high-level languages avail- 
able through the 1960s and 1970s typi- 
cally lacked the speed or precision to run 
complex and critical simulations. In ad- 
dition, the complexity of these languages 
made program development difficult. 
Therefore, a large amount of work was 
done to develop efficient algorithms that 
would optimize the routines. 

However, by the time microcomputers 
became available, language development 
had progressed considerably. C, Pascal, 
Forth, and a number of other languages 
and operating environments soon could 
be obtained easily for these new comput- 
ers. In the 1980s, execution time on mi- 
crocomputers started to approach levels 
that made mathematical programming 
reasonable. 

Further recent advances have given 
microcomputers speed and power that 15 
years ago would have been attainable 
only on very large computers. The devel- 
opment of high-speed processors special- 
izing in precision mathematics has 
further boosted the speeds of even the 


Package 


for Pascal 


By Bob Zorich 


most powerful microcomputers at least 
10 times. 

Borland International’s Turbo Pascal 
has become the language of choice for 
many programmers, especially in MS- 
DOS. The language is used increasingly 
within the Macintosh world too: 

While Turbo Pascal contains a great 
number of features, it is not particularly 
rich in mathematical capabilities and is 
limited to single 64K segments for data 
and code space. Versions that support the 
8087/287 math coprocessors are avail- 
able but do not extend the math-process- 
ing capabilities, they only accelerate 
program processing. 

In this atmosphere I started to work 
on the Scicale math utility package. This 
program can be used as a computer- 
based mathematical>reference table. But 
it was meant to be primarily a tool for 
learning the techniques and specifics of 
math programming in Turbo Pascal, as 
well as the development of a math tools 
library. 

The library contains 14 files that can 
be included into Pascal source files. 
These 14 files contain over 260 routines 
broken up by functional groups including 
conversion factors, complex algebra, and 
statistical data processing. 

This article deals with the concepts 
used to bring Scicalc to light and how 
programmers can use these techniques to 
extend Turbo Pascal’s capabilities. 

As with any program, it is crucial to 
use care and logic while setting up the 
math routines. We will build a number 
of criteria into the host program and in- 
terface to the mathematical routines: 

w Use of scalar declarations to simplify 
record keeping. 


u Minimal use of data segment, with pa- 
rameters declared locally or transferred 
through the command line. 

gw Maximum use of dynamic variable 
storage, including pointers to matrices 
and other variables. ree 

@ Installation of common input error 
trapping to prevent unexpected crashes 
and other glitches. 

w Error margin calculation and reduc- 
tion of round-off error. 

These criteria are in addition to the 
usual fanfare of user I/O, disk access, 
etc. It is also important to use consistent 
nomenclature and standardize coding if 
you build many routines into a program. 


Scalar typing 

One of Pascal’s nice features is the abili- 
ty to build rich structures of data type 
sets, called scalar types. Turbo Pascal 
also allows subranges of scalar types, 
record and array types, and various com- 
plex combinations. 

Most of these features exist in other 
dialects of Pascal and can usually be 
implemented with little difficulty. The 
features can greatly simplify implemen- 
tation of the mathematical routines with- 
in your programs. They require very 
little space, keep excess data out of the 
data segment for use by the parent pro- 
gram, and make the logic and I/O of the 
routines more apparent. Of course, in ad- 
dition to the advanced use of types, are 
the simpler integer, real, and Boolean 
types, as well as a variety of string types. 

We'll examine the typing structures 
you can use. A few basic types may be 
declared. For example, natural numbers, 


which are all integers greater than 1, can 
be declared as a range: 


Type: NaturalNumbers : 1 .. Maxint; 


Complex numbers can be similarly de- 
fined as a record: 


Type: ComplexNumber = Record 
RealPart : Real; 
Imaginary: Real; 
End; 


Matrices are defined as follows: 


Type: OneDRealMatrix 
: Array[O .. MatrixSize] of Real; 


This basic matrix setup easily can be 
modified or extended for use in a par- 
ticular area. For example, to make it 
work for integers, just replace the term 
“real” with “integer.” This modification 


is easily extended into two or more 
dimensions: 


Type: 
TwoDRealMatrix: Array[0.. 
XMatrixSize, O.. YMatrixSize] of Real; 


Note the careful use of mnemonic names 
for the types. The distinction becomes 
very important if some matrices in your 
program expect different types of data. 
For example, you can modify the preced- 
ing matrix using TwoDIntMatrix if you 
require a two-dimensional matrix of inte- 
gers or ThreeDComplex Matrix to install 
a three-dimensional matrix of complex 
numbers. 

The last major type category includes 
pointer types. Turbo Pascal virtually re- 
quires you to use pointer variables to 
store matrices. The alternative of using 
data segment space with global variables 
consumes memory at a fairly high rate 


Function InchToCin(Inch : Real) : Real; 
Begin 
InchnToCm:= Inch * 2.54; 
Eagelp 


Procedure CompAdd2(Complexl, Complex2 : ComplexNumber; 
Var ImagTotal : ComplexNumber) ; 


Begin 


ImacgTotal.real:= Camplexl.real + Complex2.real; 
ImagTotal.imag:= Complex2.imag + Complex2. imag; 


End; 


Listing 1. 


Procedure MatMult(Size : Integer; A, B: TwoDRealPointer; 


Var 


Var C : TwoDRealPointer); 


é 


XStep, YStep, Stepping : Integer; 


Begin 
Null2DMat (Size,Size,C);: 
For XStep:= 1 to Size do 
For YStep= 1 to Size do 


For Step:= 1 to Size do 


{ Primitive to zero out C } 


C*LXStep, YStepj:= C*[XStep, YStep]+ 
(A*[XStep, Step] * B*[Step, YStep]); 


End; 


Listing 2. 


70 COMPUTER LANGUAGE @ SEPTEMBER 1987 


and limits the matrix size drastically. An 
example of a pointer declaration in 
whichTwoDRealPtr points to the Two- 
DRealMatrix follows: 

Type: TwoDRealPtr : TwoDRealMatrix; 
To use pointer variables the programmer 
must define the variable using the New/() 
procedure, followed by a read-in of the 
data, whether from keyboard, disk,.data 
acquisition equipment, or another periph- 
eral. Then the data is processed, the ma- 
trix stored on disk or thrown away as 
required, the pointer variable released, 
and the dynamic memory released by us- 
ing the Dispose() procedure. 

It is usually a good idea to test for 
available memory before allocating and 
using a dynamic variable. Use of Mark/ 
Release is discouraged, as it requires 
more diligence in controlling the operat- 
ing environment and is incompatible with 
the New/Dispose method of heap man- 
agement and with many, if not most, 
Turbo Pascal programs (at least those in 
the public domain). 


Functional programming 

To minimize use of the data segment (for 
use by other parts of the parent pro- 
gram), all math routines should be func- 
tional, that is, they should pass all of the 
routine’s external parameters through 
the command line. This is done by pass- 
ing data by reference or value. These two 
methods allow the programmer to send 
data to and receive data back from a 
routine. 

If the routine heading describes a vari- 
able passed by reference, the variable 
will be changed as a result. If the vari- 
able is sent as a value, the variable will 
not change in the parent program. This 
technique requires the minimum free dy- 
namic memory to be set as high as prac- 
ticable. All major components and 
variables of your routines will be passed 
from the heap to the routine through the 
stack. With this technique global varia- 
bles, which use data segment space, Are 
not needed for the math routines. All 
data segment space remains available to 
the parent program. These techniques 
ensure that the routines and their effects 


are as transparent to the parent program 
as possible. 

A simple example (Listing 1) includes 
two typical routines translating inches to 
centimeters and adding two complex 
numbers. Notice that the routine Com- 
pAdd2 also demonstrates a convenient 
notation for passing the parameters to 
and from a procedure. The use of the re- 
served word var on ImagTotal will pass 
back the values generated by the proce- 
dure. By not using var on the input var- 
iables, Complex! and Complex2, the 
original values of these variables are not 
changed. I will discuss this in more detail 
shortly. 

In addition to passing parameters and 
variables on the stack, Turbo Pascal al- 
lows you to use dynamic variables. These 
variables are defined on the fly, typically 
either stored on the disk or input at the 
time of use. This method allows you to 
use whatever memory is left in the sys- 
tem after the code, data, and stack seg- 
ments are declared and used. 

Since the data segment can hold only 
64K, this segment clearly should not be 
used for large variable types, such as ma- 
trices, because of the likelihood of run- 
ning out of space. This problem becomes 
even more apparent if you must use mul- 
tiple matrices in the same routine. 

This dynamic storage, called the heap, 
is not particularly hard to implement. 
But it requires programmers to maintain 
control of the memory used since the 
possibility of overwriting or corrupting 
the memory allocation exists and is near- 
ly always fatal. 

The routine in Listing 2 describes the 
use of the heap in a matrix manipulation 
environment. In a long or complex pro- 
gram that uses a lot of heap space, it is a 
good idea to test for available memory 
before allocating and using a dynamic 
variable. 


Input error trapping 

To guarantee data base and routine in- 
tegrity against corruption from danger- 
ous input, a certain number of error 
trappings must be built into the proce- 
dures being written. These procedures do 
not need to be extensive and are easier to 
implement when built in from the begin- 


ning. For example, the log of a number 
cannot be found if the number is 0 or 
negative, as in the following routine: 


Function LoglO(Value: Real): Real; 
Var > 
ErrorTrap. Boolean; 
Begin 
If Value <= O then 
Begin 
ErrorTrap:= ErrorFun(4); 
Exit; 
End; 


Log10:=0.4342944819*Ln(Value); 
End; 


ErrorFun() is a simple routine that in 
this case displays an error message and 
aborts the function. It returns a Boolean 
value to allow the host program or math 
routines to run other error-handling rou- 
tines on its return. A sample Errorfun/() 
routine is demonstrated in Listing 3. 

Note the use of pointers to an error 
message array stored in dynamic mem- 
ory. These can be stored on disk and put 
into the heap early in the host program 
as a global variable. This procedure also 


Function ErrorFun(ErVar : 
Var 
TempErrMsg : Stringl12]; 
Begin * 
ErrorFun:= True; 
Case ErVar of 


saves data segment space and speeds up 
access to the strings, compared to storing 
the data as an overlay. 

ErrorFun() is fine for error display but 
does not trap errors. Error trapping must 
be done within the routine. Control of 
the program should then be sent out of 
that routine prior to further execution. 
When functions are used, it can be diffi- 
cult to send error codes back to the par- 
ent program. When using procedures, 
you can return an error code to the par- 
ent by passing a reference variable back 
and forth. 

The danger of not passing some sort of 
error code is that an error can play havoc 
with results, especially if the final result 
will be used in another calculation. For 
functions, you may need to declare abso- 
lute variables or place additional error- 
trapping procedures within the parent 
program, possibly looking for grossly in- 
accurate results. These solutions are not 
very elegant, however. I leave it to you to 
determine more useful error code 
interruption. 

Another area of error trapping is re- 
moving or reducing the effect of round- 


Integer): Boolean; 


1: TempErrMsg:= ErrorMsg [ErVax J; 
{ErrorMsg is Global Ptr to list of Error} 
{Messages stored in heap} 
{For example, 1 could point to overflow} 
{ 2 to division by zero} 
{ 3 to square root of negative numbers} 
{ fo (og fineton error (8 or 
2: TenpErrMsg:= ErrorMsg LErVar]; 
3: TempErrMsg:= ErrorMsg [Ervar ]; 


. 


End; 
Writeln('Error: ', ErVar, TempErrMsg); e 
End; 


Listing 3. 


off error. This problem, common in data 


analysis, must be addressed in environ- 


ments where data is used repetitively or 
. to set up further calculations. Round-off 


error can grow very large in such cases 
and easily corrupt the data being 
processed. 


The round-off error problem becomes 


more significant as processor precision 


increases. This problem occurs often be- 
cause it is easy to ignore the significance 
of the data analyzed when doing the data 
manipulation with a 13- or 14-decimal- 
point precision processor. Thus, while ac- 
celerating processing, a math coprocessor 
can tend to show greater cumulative 
round-off or precision errors. In any 
event, error below the accuracy of the 


Procedure CleanUpbata(PrecisionDesired : Integer; DataIn : Real; 


Var 
Precision : Integer; 
Begin 
Precision:=; 
Repeat 


DataiIn:= Datain*1¥; 


Var DataOut : Real); 


Precision:= Precisiontl; 
Until Precision= PrecisionDesired; 


DataIn:= Round(DatalIn); 


Precision:= 0; 
Repeat 


DataIn:= DataIn / 10; 


Precision:= Precisiontl; 
Until Precision= PrecisionDesired; 


DataOut:= Datain; 
End; 


Listing 4. 


Procedure InpMatA(XSize, YSize 


Integer; Var A: TwODRealPointer) ; 


Var 
Step, Stepper BR dheleeic (ere 
TempA : Real; 
Begin 
For step:= 1 to Xsize do 
Begin 
For Stepper:= 1 to Ysize do 
Begin 
GoToxy¥(1, 25); ClrHol; 
Write('Matrix Element(',step,',',stepper,'): '); 
GoToxy ( (18* (stepper-1))+1,2*Step); 
Cursor(on); 
Read (TempA) ; 
A*[step,stepper]:= TempA ; 
: End; 
End; 
End; 
Listing 5. 
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measurement technique must be filtered 
out. 

The simplest method of error trapping 
requires the program to know in advance 
how precise it expects the data to be and 
truncate or round this data to the desired 
position as it is produced. This procedure 
is demonstrated in Listing 4. 

The variable PrecisionDesired is a 
measure of the number of significant 
decimal places allowed in the formula. In 
addition to the concern about the signifi- 
cant digits, you must be concerned about 
the real uncertainties of the data due to 
its physical properties. 

For instance, the readings of an instru- 
ment may fluctuate, or you may have in- 
sufficient information about a piece of 
data or a formula to apply an exact 
amount of uncertainty. A simple example 
of this uncertainty can be found in the 
calculation of the area of an ellipse. In 
this case, you introduce the error by the 
measurement of the ellipse’s diameter, 
increased by the error introduced by the 
use of pi. 

It is beyond the scope of this article to 
list every method used to describe uncer- 
tainty and quantify it. But a number of 
good texts are available on this subject, 
some of which are listed in the 
references. 


Details, details 

As with all languages, Turbo Pascal has 
a few minor idiosyncracies that ensure 
convenient programming in some situa- 
tions but can hamper programming in 
others. One example is Turbo Pascal’s 
GoToXY/() routine, which is a nice fea- 
ture to help you move around on the 
screen. Unfortunately, the output gener- 
ated as a matrix of x vs. y results in data 
inverted from the mathematical stan- 
dard. This is adjusted in screen I/O rou- 
tines only and will not be an issue in the 
evaluation of matrices. An example ma- 
trix data input routine is shown in List- 
ing 5. 

Also, you will find that the Pascal lan- 
guage does not support a number of 
commonly used utilities. These handy 
routines should be built into a separate 
file that can be accessed by all other rou- 
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tines in the program. The utilities that 
are unavailable that can be used in a va- 
riety of instances include number base 
conversion, log to base 10 or to any base, 
factorials, nth roots, nth powers, and de- 
grees to radians. The last few utilities 
are extremely convenient since Turbo 
Pascal trig functions expect data to be 
sent in radian format. Almost all other 
functions and procedures can be built 
from this basis. 

I have discussed some of the tech- 
niques that you can use to extend the 
power of Turbo Pascal. The goals out- 
lined are fairly specific to Turbo Pascal 
but probably can be set up for other Pas- 
cal dialects without much difficulty. The 
basic concepts can be used in other lan- 
guages as well. The techniques involve 
dynamic memory allocation for variable 
storage, functional formatting to allow 
transparency to the host program, scalar 
typing to minimize programming com- 
plexity, input error trapping, and round- 
off error reduction. 

I also described some of the specific 
procedures needed to implement math 
routines. I did not discuss methods to 
build or optimize programs using math- 
ematical routines, nor did I discuss 
methods of numerical analysis, as both of 
these subjects are too complex to cover in 
this article. 

The Scicalc demo program is in the 
public domain and available on a number 
of bulletin board systems, including 
COMPUTER LANGUAGE’s BBS and 
CompuServe forum. To obtain the source 
code, send a check for $30 (plus $5 for 
shipping and handling) to me at 1111 W. 
El] Camino Real, Suite 331, Sunnyvale, 
Calif. 94086. | 
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inexpensive—PC symbolic program- 
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development needs. 
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PC Scheme 3.0 

—Optimizing incremental byte-code 
compiler for ease of programming 
and operation 

—EMACS-like editor 

—Lexical scoping of variables 
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execute DOS-based programs, then 
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1-800-527-3500 
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Turbo Pascal is a registered trademark of Borland International. 
IBM is a registered trademark of International Business Machines 
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TEXAS 4a 
INSTRUMENTS 


he vast majority 
of my waking 
hours is spent 
pursuing both my hobby and my profes- 
sion: computers. When not writing about 
them, I use them for business, writing 
programs for other people. Although I 
love changing languages, at least 80% of 
my programming is in dBASE or one of 
its dialects and compiled versions. 

I have just about every utility, compil- 
er, and add-on that has even the remotest 
possibility of being useful in my dBASE 
work. One of the most useful utilities is a 
straightforward syntax checker: it scans 
code lines, points out misspelled com- 
mand words, and, most importantly, de- 
tects all mismatched control sequences. 

This last function had my usual pack- 
age paying for itself in the first few out- 
ings; I used to spend many an agonizing 
hour drawing loops by hand on long 
printouts. Additional features, such as 
variable cross-referencing and formatting 
code to proper indentations, made this 
package indispensable for me. 

Although I have always touted public 
domain versions of software, until recent- 
ly I had never seen any syntax checker 
that could do the job as well as the com- 
mercial utilities. Certainly, there are 
cross-reference generators and a few for- 
matters and syntax checkers available, 
but most have not been as easy to'use as 
the commercial packages and did not 
provide all the essential functions I felt I 
needed. Now, thanks to a kind reader, I 
have found the solution to that problem 
also, and is this product good! 

First, my thanks to Andrew Walsh of 
North Olmsted, Ohio, for bringing this 
product to my attention. I really am 
amazed that it has escaped my attention 
for so long. After writing about public 
domain software in COMPUTER LAN- 
GUAGE for the last three years and oth- 
er publications during the three years 
prior to that, I thought I knew the field! 

Written by Walter Kennamer (1801 
E. 12th St., Apt. 1118, Cleveland, Ohio 
44114, or on CompuServe as 74025,514) 
this program, called SNAP!, may just 
get my vote for the most useful public 


dBASE becomes a SNAPI!; a C graphics library 


UBLIC DOMAIN SOFTWARE REVIEW 


By Tim Parker 


domain product of the year. SNAP! first 
appeared last year; its latest reincarna- 
tion is v. 2.0. Written entirely in Turbo 
Pascal, SNAP! rivals every commercial 
product on the market. 

What does SNAP! do? It provides 
variable cross-referencing, tree structures 
for programs and data bases, data dictio- 
naries, and index, format, report, and 
procedure summaries. It produces .LNK 
files for Clipper, formats source code, 
generates action diagrams, creates batch 
files for file backups, allows case changes 
of key words, and permits header infor- 
mation to be placed at each file start. 

SNAP! is making the rounds as an ar- 
chived file consisting of the program it- 
self, some support files of keywords, and 
a well-written documentation file. The 
documentation is easy to read, explains 
the system very well, and provides a sam- 
ple analysis of an application in an 


appendix. 
ow does SNAP! 
work? After ini- 
tializing a few 


variables, such as the name of the pro- 
gram to be processed, a window that pro- 
vides the file name currently under 
examination, the number of lines in the 
file, and a pass number appears on the 
screen. Most files checked involve only 
one pass, unless they are called by sever- 
al routines. wee 

A more detailed report can be generat- 
ed if the code is formatted. Then, totals 
reflecting the number of programs, data 
bases, indexes, format files, report for- 
mats, variables, and number of lines in 
the structure scanned are given. The 
amount of free memory remaining in the 
system is also provided. 

Errors encountered during a scan of a 
file are reflected in a window in the up- 
per right corner and stored in a text file 
called ERRORS.DOC. The syntax 
checkers caught every one of the careful- 
ly contrived errors I created. 

One of the acid tests of syntax check- 
ers has always been to use code that in- 
cludes the very brief forms of dBASE 
commands. SNAP! recognized all of the 
short forms, with one exception. Embed- 
ded tabs had no effect on the recognition, 
nor did miles of white space between the 
keywords. 


The exception, which the author notes 
in the documentation, is the IVDEX 
command. Because INDEX can be speci- 
fied in several valid ways, SNAP! expects 
the full spelling to be there. (Parsing the 
lines would get excessively time consum- 
ing if this wasn’t done.) 

SNAP! helps improve code readability 
by allowing source code to be indented. 
It recognizes dBASE control structures 
and provides tab indents or character 
spacing, depending on the user’s 
requirements. 

If tabs are used, the word processor or 
editor must be set to provide enough tab 
stops. There can’t be too much space be- 
tween tabs; the text can run off the right 
edge.of the screen when indentation 
reaches six or seven levels. 

Using space characters was preferable 
in the testing I did, but I suppose it’s 
good to have the choice. The number of 
spaces used for each indentation level 
can be changed, and I found three spaces 
to be a good balance between excessive 
white space and too little delineation of 
structure. 

SNAP! also generates action dia- 
grams. These are code displays with ex- 
tended ASCII characters used to 
physically draw the loops on the screen, 
printer, or file. These diagrams allow 
very rapid code analysis and indicate 
messed up syntax graphically. Loop exits 
that are not standard, such as RETURN 
or LOOP, can be spotted easily using the 
action diagrams. As a nice touch, the 
characters that are used in the action 
diagrams can be changed (if you have a 
strange printer, for example). 

Capitalization of keywords is some- 
thing a lot of dBASE programmers seem 
to be doing, although the fad never quite 
caught on with me. If you prefer capital- 
ization, SNAP! will do it for you auto- 
matically, by matching words in your 
code with a file of keywords and 
capitalizing. 

Because the file can be edited, the pro- 
grammer can select the types of , 
keywords to be capitalized. For example, 
in a networking application, you may 
only want to capitalize file-locking com- 
mands, so only those commands are 
named in the reference file. Two refer- 
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Read what they're saying about this 
popular program for prototyping and 
demo-making: 


“A winner right out of the start- 
ing gate. After you use DEMO 
once, you’ll wonder how you got 
along without it.”’ 

—PC Magazine 


‘Everybody who writes soft- 
ware, either commercially or for 
in-house applications, should 
immediately order a copy. Period. 
No exceptions.”’ 

—Soft: letter 


Product of the Month 
—PC Tech Journal 


Thousands of developers and most 

of the largest and best known software 
companies are using this program. 
You can, too. Act now! 


The perfect companion to the Demo 
Program. The Tutorial helps you learn 
the ins and outs of its basic and ad- 
vanced features. Complete with a 96 
page manual containing step-by-step 
instructions, diskette, and function 
key template. 


Use 800-number for orders only. 

Questions, special shipping, etc., call 617-332-2240. 
No Purchase Orders. Massachusetts residents add 5% 
sales tax. Outside of the U.S.A., add $15.00. 

Requires 256K IBM PC/Compatible, DOS 2.0 or later. 
Supports Monochrome, Color Graphics, and EGA 
Adapters (text mode only). The Tutorial requires the 
Demo Program. 


SOFTWARE 
GARDEN, INC. 


Dept. L 


P.O. Box 373, Newton Highlands, MA 02161 
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ence files are maintained, one for 
dBASE II and one for dBASE III. 

Tree structures can be generated with 
SNAP!, which produces a chart of the 
programs and their calling parents. This 
chart is echoed to screen and to a file. 
The data bases called inside a program 
or procedure are listed beneath the name 
of the program unless it has been called 
by a higher program. 

As an additional variation on the tree, 
a simple list of the files and data bases 
used by an application can be generated. 
This variation is useful in determining 
which files in a subdirectory are actually 
used by the application. 


he data dictio- 
Te created by 

SNAP! lists the 
data base structure of each .DBF used 
by the application and references all pro- 
grams or procedures that call the data 
base. Additionally, a listing of the fields 
in the data bases and their system use 
can be obtained. 

Similar to the data dictionary, an in- 
dex file summary can be requested that 
lists each indexed file in the application 
and the fields the index is created on. All 
files that use the index file are listed. A 
list of format files, procedure files, and 
report formats can be created in exactly 
the same manner. 

Variable cross-referencing is useful as 
a debugging tool, and SNAP! allows a 
considerable amount of versatility in this 
regard. dBASE III programs can be 
checked only for PUBLIC variables or 
for all variables. Additionally, the user 
can choose whether to include other var- 
iables, keywords, or numeric constants. 

The cross-reference report appends a 
code to the line numbers listed in the re- 
port (by file name) to indicate how each 
variable is used. The report shows decla- 
rations, RELEASEs, PUBLICS, input re- 
quests for that variable, REPLACEs, 
and output commands. This coding al- 
lows the programmer to determine 
quickly which lines have to be checked 
for a bad input, for example, or for a 
RELEASE that shouldn’t have been 
performed. 

An additional feature that program- 
mers will find useful with SNAP! is the 
ability to provide in-line macro com- 
mands. These are identified by a specific 
syntax and processed when SNAP! is ex- 
ecuted. During program testing, macros 
can be used to loop to possible macro re- 
sults. An example of such usage is ex- 
plained in the documentation file. 

Clipper programmers will appreciate 
the capability of generating .LNK files 
for use with Phoenix Computer Products’ 
Plink86 linker. A nice addition for Clip- 
per users is a makelike utility that deter- 
mines which files have changed since a 
previous compile and will work on only 
those files. 


SNAP! will create a batch file for 
backing up files to floppies or other di- 
rectories, if required. Another batch file 
that can be generated will copy only 
.DBF files or move only updated files. 


Scsuauaeseenae printout of 
seccenrese pease SNAP’s source 
Scessuaueaenscanaeas code for docu- 


mentation purposes can be generated, if 
required, in a nicely formatted structure. 
Control over the line width; page length; 
left, right, top, and bottom margins; 
spaces per tab (if used); suppression or 
use of line numbers; and printer setup 
strings can all be generated. 

In addition, a header with the pro- 
gram name, system name, programmer 
or copyright holder, date, time, and page 
number can be placed at the top of every 
page. This is ideal for providing a client 
with a printed binder of code in a neat 
structured format. 

SNAP! uses about 250K of memory, 
and a good operating environment would 
comprise 512K or more. A maximum of 
20 levels of nesting can be tracked with 
SNAP!; 256 files is the maximum it han- 
dles in a single pass. Up to 999 variables 
can be assessed, with a maximum of 690 
references to each. Only (!) 512 data 
bases can be referenced in a single analy- 
sis pass. With these “limitations,” it 
looks like SNAP! handles just about any- 
thing a programmer could throws at it. 

I tested SNAP! on a very large appli- 
cation I am writing for the real estate 


business. Written in FoxBASE Plus, with ~ . 


versions in both XENIX and DOS, the 
code has already reached over 1MB. 
SNAP! had no trouble handling this ap- 
plication or its multiple nestings and 
cross-referencing of procedures and pro- 
grams. The source code printout itself 
would have been worth several hundreds 
of dollars (and many hours). 

SNAP! uses windows well and pro- 
vides the cursor control of selections that 
has become very popular. The code is a 
marvel of Turbo Pascal: how the author 
got it to run so fast is a mystery to me. 
The source code must be very concise 
and elegant. 

If it sounds like I am impressed by the 
product, I am. SNAP! is one of those 
rare finds in the public domain arena 
that is elegant, fast, of general use to 
many people, and extremely well written. 
If you dabble even to the slightest extent 
with dBASE, Clipper, QuickSilver, Fox- 
BASE, or any of the interpretive dBASE 
workalikes, SNAP! should be high on 
your list of software. 


he C Users 
Group has some 
new releases that 


of interest to programmers. One 
that I’ll discuss here is a graphics library 
designed for the IBM PC and similar 
systems. 


—- Barma 


The Compatible Graphics Library was 
written by Rainer Gerhards (Petronel- 
lastr. 6, D-5112 Baesweiler, Federal Re- 
public of Germany) and released to the 
public domain early this year. Currently, 
it only supports the Lattice v. 3.0 and 
Datalight v. 2.23 compilers. 

This library is a series of procedures 
designed to allow porting graphics from 
environment to environment. To date, 
only the MS-DOS version has been re- 
leased, but work is supposedly under way 
on CP/M and UNIX versions. All ver- 
sions utilize the same structure, differing 
only in the kernel. Such a hardware- 
independent system would be useful for 
many programmers who now feel the 
pressure of being able to port their C 
code to other operating systems and hav- 
ing to carefully handle graphics inter- 
faces because of this. 

The Compatible Graphics Library 
supports a number of useful graphics 
functions, including switching between 
display modes; drawing pixels, lines, or 
boxes; filling boxes; drawing ellipses 
(whole or part); painting screen sections; 
reading pixel attributes; and allowing 
hardcopy output to the printer. The li- 
brary supports global coordinate systems, 
easing the programmer’s task of calculat- 
ing parameters for different screen 
modes. 

This product requires PC-DOS or 
MS-DOS y. 2.0 or later and either a 
standard CGA, MDA, EGA, or Hercu- 
les screen. Supported printers include the 
Epson line (and compatibles) and NEC 
Pinwriter P6 and P7. 

This library can be found under sever- 
al names, but the one I located was la- 
beled GRAPHLIB. It consists of several 
versions of the software, in .H and some 
.C files, with a documentation file. The 
documentation file is sufficient to get go- 
ing, although it is obvious that the au- 
thor was not really conversant with 
English and future editors tried to cor- 
rect the text as it was written instead of 
rewriting it completely. This problem is 
not major; the use of the library is ex- 
plained well enough, and most of the 
functions will be self-evident. 


eaaa he Compatible 
Fe Graphics Library 


suanuueegognegageacse is designed in two 
parts: the high-level, machine-indepen- 
dent routine comprising the kernel, and a 
low-level, machine-dependent routine. 
Header files are included for each part. 
The high-level code is written entirely 
in C and comprises the primitives for the 
supported graphics functions. The low- 
level routine is a mixture of C and as- 
sembler, although the C code is 
predominant. (This allows an ambitious 
programmer to modify the library to his 
or her heart’s content, without having to 
be an assembler wizard.) Each supported 


video device has a different version of the 
library, so the correct one must be cho- 
sen. The documentation file lists the sup- 
ported functions, with a brief description 
of their purpose and usage. 

I tried the Graphics Library with the 
Lattice compiler and found it worked 
flawlessly. Although the library’s graph- 
ics functions did not work as fast as some 
others that have been specifically coded 
for the DOS environment, the difference 
was minimal, and I only noted it when I 
requested repeated iterations of ellipse 
drawing and filling. I suspect that in nor- 
mal use the library will perform as well 
as any programmer can require. 

A new graphics library in C is not that 
big a deal. What is important with this 


one, though, is its inherent attempt at 
portability. Although the MS-DOS ver- 
sion is the only part written so far, it 
would seem inevitable that some dedi- 
cated programmer will port it to other 
environments. 

A study of the code indicates that such 
a port, although not easy, is not horren- 
dously complex either. Apparently some 
work is already under way on versions 
for several supermicros. Although I have 
not tried it, a rewrite for XENIX/UNIX 
seems to be almost ready, at least for In- 
tel family versions. [Fi 


Tim Parker is a systems programmer in 
Ontario, Canada, who also writes for 
several technical magazines. 


Complete C Programs 
in Half the Time, 
with Instant-C™ 


Instant-C helps you create a working, well-tested program faster than 
any other interactive C development system. Much faster than traditional 
compilers, linkers, and debuggers. 


H* to believe? Here's how we do it. 
Because Instant-C is a high-per- 
formance interpreter there are no com- 


pile or link delays. Change your program, 


then test it immediately. No matter how 
large your program, the turnaround time 
is just seconds. 
“Tastant-C aes instant gratification” —PC 
Magazine, Editor’s Choice for best C interpreter. 
10/29/85 

Time after time, the Instant-C prompt was 
starting back just barely after pressing Enter” — 
PC Tech Journal, 5/86 


Source-level debugging saves your time. 
- set any number of conditional 
breakpoints in your program; 
- stop execution from keyboard; 
- single-step by source statement; 


- examine and change variables or 
code, and tontinue execution; 


- execute any statement or function 
directly for instant testing; 


- display source code back-traces; 
- source code animation; 
- monitor data changes; 


- full-screen and multi-screen support, 


even with non-standard graphics 
devices. 


“The resulting debugging and testing 
capabilities are fantastic and the detailed 
trace/debug/display commands make it easy.’ — 
The C Journal, 5/85 


Run-time checking stops your program 
as soon as errors occur, when bugs are 
easiest to understand and fix. 
- pointer references checked for 
reasonableness; 
- array indexes checked within 
declared bounds. 


Not only does Instant-C help you quickly 
change, test, check and debug your code, 
but it runs your program faster than any 
other C interpreter. Fifty to 500 times 
faster! Fast enough for real programs, 
even fast enough for real-time programs. 


“It is much faster than any of the other products 
mentioned and was the only one able to 
complete the standard SIEVE in a reasonable 
time. Clearly, this high speed allows much more 
complex problems to be attacked with Instant-C 
than with any of the other products 

discussed.’ — Computer Language, 2/86 


Immediate feedback and more than 400 
diagnostics makes Jnstant-C great for 
learning C. Full K&R and the ability to 
link compiled object code and libraries 
(Lattice and Microsoft) makes Instant-C 
compatible with your existing programs. 


“When you get right down to it, I don't think 
there's a better way you could learn C-— 
Programmer's Journal, 3/85 
“Clearly, Instant-C is the performance 
champion. —PC Pech Journal, 5/86 
The bottom line for-your business is in- 
creased productivity. The result for you is 
a job well done, and quickly. 
“We y feel that Instant-C can have a 
major positive impact on programmer 
productivity” —Computer Language, 2/85 


“Instant-C by Rational Systems is a C 

programmer's dream.’ —Micro/Systems Journal, 

3/86 ; roe ; 
Version 2 is available for MS-DOS and 
PC-DOS, and comes with a full 31 day 
money back guarantee. Instant-C is only 
$495. Order today! Call or write for full ° 
information. 


Rational 
Systems, Inc. 


PO. Box 480 
Natick, MA 01760 
(617) 653-6194 
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MICROWAY ACCELERATES YOUR PC! 


LOTUS/INTEL EMS 
SPECIFICATION BOARDS - 
MegaPage™ The only EMS board which 
comes populated with two megabytes of 


cool-running, low power drain CMOS 
RAM installed. Includes RAM disk, print 


NUMBER 
SMASHER/ECM™ 


Triples the speed of CAE 
and all applications! : 


From 


$599 


FastCACHE-286™ 
Runs your PC Faster than an AT! 
Runs the 80286 at 9 or 12 MHz and the 
80287 at 8, 9 or 12 MHz. Includes 8 
kbytes of 55ns CACHE. 


Compatible with IBM PC, XT, Leading 
Edge Model D, Compaq, and Turbo 
motherboards. Includes 8088 Reboot 
Switch, DCache, Print Spooler and 
Diagnostics 2 ..60 2.05.3 From $399 


8087 SOFTWARE 


IBM BASIC COMPILER ......... $465 
MICROSOFT QUICK BASIC ...... $79 
87BASIC COMPILER PATCH ....$150 
87BASIC/INLINE .............06 $200 
IBM MACRO ASSEMBLER ...... $155 
MS MACRO ASSEMBLER........ $99 
87MACRO/DEBUG............. $199 
MICROSOFT FORTRAN V4 ..... $299 
RIMIE@RIMRAN?: ©: oshese seat te $399 
LAHEY FORTRAN F77L......... $477 
MSiOnFATMIGEIG snc.cc. ces e.ecee CALL 
STSC APL®&PLUS/PC........... $450 
STSC STATGRAPHICS .......... $675 
SRSS/PRGR ascot eee toate $695 
87SFL Scientific Functions ....... $250 


Turns your AT into a high speed, multi-user 
Xenix business system! 


8 port, intelligent serial controller with 3% 
response degradation. Includes 8 MHz 
80186 with built in DMA........ $1299 


spooler, disk cache and EMS drivers. For 
the IBM PC, XT and compatibles. . .$549 
MegaPage with @K ............ $149 
MegaPage with 2 megabytes of HMOS 
RANI ramcrctenetteien. cco tatremee $419 
MegaPage AT/ECC™ EMS card for the 
PC AT and compatibles includes Error 
Correction Circuitry. With ECC, 11 RAM 
chips cover 256K so the user never en- 
counters RAM errors. With 1 megabyte 
GCMOSIRAM MP tests. ous coe eatttne $699 
INTEL, JRAM, or Maynard ....CALL 
INTEL INBOARD 386 @K ..... $1250 


287 Turbo runs the 80287 at 
| 100r12 MHzintheIBMPC 
AT, compatibles and the 
new Compaq 386 with 100% 
software compatibility. 


PC Magazine “‘Editor’s Choice” 


MICROWAY SOFTWARE 
FOR LOTUS 1-2-3" 


PowerDialer® Addin for Lotus 1-2-3 
Release 2. Automated telephone dialing 
from within 1-2-3. Adds least cost routing, 
automatic carrier selection and automated 
phone book worksheet. Builds cus- 
tomized dialing applications. Can be used 
With!DeSGVICWa.t a, cactl-eaieisas << $79 
FASTBREAK™ employs the 8087 to in- 
crease the speed of Lotus 1-2-3™ Version 
1A or 1A*. Users are reporting speed ups 
of between 3 and 36 to 1. When run with 
our NUMBER SMASHER accelerator 
card, recalculation speed ups of 10 to 30 
are being reported ............... $79 


HOTLINK™ adds easy linking of spread- 
sheets to Lotus 1-2-3 Version 1A...$99 


12 MHz 
8086/8087 
Accelerator 
Plus 
A Megabyte for DOS! 
For the IBM PC, XT and compatibles 


PC Magazine “Editor’s Choice” 


8087 UPGRADES 
All MicroWay 8087s include a one year 
warranty, complete MicroWay Test 
Program and installation instructions. 


8087 5 MHz.................... $99 
For the IBM PC, XT and compatibles 

8087-2 8 MHz................ $154 
For Wang, AT&T, DeskPro, NEC, Leading Edge 
80287-3 5 MHz............... $159 
80287-6 6 MHz............... $179 
For 8 MHz AT and compatibles 

80287-8 8 MHz............... $259 
For the 8 MHz 80286 accelerator cards 
80287-10 10 MHz............ $395 
80387-16 16 MHz............ $495 


64K 150ns ..... $15 256K 150ns..... $36 
Call for great prices on V20 & V30 


287 TURBO-PLUS™ 
Speeds up your AT 
Adjustable 80286 Clock 6-12 MHz 
10 MHz 80287 Clock 
Plus Full Hardware Reset ........ $149 
Optional 80286-10 ...... $175 


287 TURBO-PLUS 
With 80287 10 MHz ............ $549 
Withi8O287129MIZ Sees See $629 


CALL (617) 746-7341 FOR OUR COMPLETE CATALOG 


Micro:°.2”.. 
Way 


02364 USA 
617) 746-7341 


The World Leader 
in 8087 Support! 
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MicroWay Europe 

32 High Street 
Kingston-Upon-Thames 
Surrey England KT1 1HL 
Telephone: 01-541-5466 


Me WAI-EYE 


Search is sometimes considered the fun- 
damental problem of artificial 
intelligence. 
—J. Anderson, A. Corbett, 
and B. Reiser, Essential LISP 


The term “search” can always be under- 

stood as the search for an appropriate 

operator sequence for the problem at 

hand. 

—Edward A. Feigenbaum, Handbook of 
Artificial Intelligence 


echniques for ef- 
ficient searching 
constitute some 


of the core ideas of AI research in prob- 
lem solving and game playing—dealing 
with a problem where one choice leads to 
another. At one time, exploration of ad- 
vanced search techniques dominated AI 
research, and some believed searching 
could provide the solution to many of 
Al’s intractable problems. 

While the possibility of a search elixir 
is no longer considered so promising, ba- 
sic search techniques developed through 
research are fundamental to AI pro- 
gramming and make good tools under al- 
most any computing circumstances. They 
are valuable for: 
mw Puzzles and games 
mw Theorem proving in logic or 
mathematics 
@ Shortest path connecting nonequidis- 
tant points 
m Best move or sequence of moves 
mw Sequences of transformations that will 
solve a symbolic integration problem 
g@ Natural language and speech 
understanding 
w Learning 
@ Obstacle avoidance and other aspects 
of robotics. 

I will summarize the most common ap- 
proaches to search algorithms and focus 
on two widely applicable approaches. 

Search systems have three compo- 
nents: data base, operators, and a control 
strategy. .We must get from a starting 
point to a goal and gather specific infor- 


In search of search 


By Susan J. Shepard 


mation along the way. A solution is a 
path from an origin, usually the root 
node, to an explicitly defined goal or a 
set of states satisfying a given predicate. 

Algorithms for taking a route from 
start to finish are known as depth-first, 
breadth-first, best-first, and beam. If the 
best route is needed, branch and bound 
or Nils Nilsson’s famous A* (ASTAR) 
algorithm can be used. Well-known 
searches for games are minimax, alpha- 
beta pruning, heuristic pruning, and heu- 
ristic continuation. 

Alpha-beta pruning is a descendant of 
minimax, the procedure derived from 
John von Neumann and Matthew Mor- 
genstern’s game theory analysis. It is of- 
ten cited as an algorithm that simulates 
human intelligence because it makes a 
problem manageable by selectively re- 
ducing options. While often associated 
with games, especially chess-playing pro- 
grams, alpha-beta is a general method 
applicable to many problems. 

However, the following two algorithms 
are more basic and useful. Fundamental 
to search theory in AI is a distinction be- 
tween two-types of thinking: deep and 
broad. Depth-first search and breadth- 
first search characterize two kinds of 
thinking readily associated with human 
beings. A depth-first thinker follows an 
idea to the limit before returning to con- 
sider alternative solutions. A breadth- 
first thinker skims’ every conceivable 
alternative before selecting a few for 
careful examination. 

Depth-first and breadth-first algo- 
rithms are generator functions. They de- 
velop a search graph as they proceed and 
influence the order in which the search 
tree is grown. 

A good reason to use these algorithms 
is their sheer productivity. Cases often 
occur where the search space is so small 
that brute force is better than complex, 
albeit clever, programming. A brute 
force approach uses either depth-first 
search or breadth-first search. 

The primary difference between depth- 
first and breadth-first is the order in 
which they examine nodes, or states, in 
the search tree. In both it is assumed 
that all nodes can be reached by a single 
operator. This procedure expands a given 


node. Both approaches assume the state 
space graph is a tree, there is only one 
origin node, and the path from the start 
to any other node is unique. Whenever a 
node is expanded and a node for each of 
its children is created, the children point 
back to the parent node. When the goal 
node is reached, tracing the solution path 
is possible. 

Depth-first search is a backtracking 
search that manages its search path on a 
last-in, first-out basis, moving new states 
to the front. It is forward reasoning, 
however, because it moves from a start 
node toward a goal node. This procedure 
is easily seen in Figures | and 2. 

A depth-first search commences with 
the origin, or root, node, examining one 


Tree to be searched 


O (Origin) 
A D (Nodes) 
ISo | 
B E 
| | 
(E G (Goals) 
Ne 
Figure 1. 


Depth-first search 


O (Origin) 
A D (Nodes) 
Tc | 
q G (Goals) 
Figure 2. 
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Power Graphics 
for your PC! 


"Product of the Month"§ 
".. a technological tour de 
force for fast PC graphics." 


NO ROYALTIES! 


MetaWINDOW is an advanced, high 
performance graphics development 
toalkit which bridges the gap between 
low-level graphic primitive Jibraries and 
pre-packaged window managers. 


MetaWINDOW provides an expand- 
ed set of graphic drawing functions, 
plus the added functionality and 
performance required for designing 
multi-window desktop applications. 


¢ auto-cursor tracking 


¢ pull-down menus 


* pop-up windows 


¢ comprehensive 
graphic functions 


10Pont 12 Point 


¢ multiple fonts 


¢ Display multiple bitmap or 
"filled-outline" fonts. 
¢ Face fonts for bold, italic, under- 
line or strike-out stylings. 
¢ Full "RasterOp" transfer 
functions for writing, erasing, 
rubberbanding or dragging: 
lines, text, icons, bit images 
and complex objects. 
¢ Create pop-up menus, 
windows and icons. 
¢ Supports IBM's new PS/2 VGA 
and MCGA graphics. 


MetaWINDOW comes complete with 
fangauge bindings for 16 popular C, 
Pascal and Fortran compilers, plus 
dynamic runtime support for over 40 
graphics adaptors and input devices. 


MetaWINDOW 

Advanced Graphics Toolkit 

4 disks, 3 260 page manuals - $195" 

All the features of MetaWINDOW for 

Borland Turbo C/ - $95" 
(Plus $5.00 shipping and handing 

TO ORDER CALL 1-800-332-1550 

For information or in CA call 408-438-1550 


} METAGRAPHICS 


SOFTWARE CORPORATION 
269 Mount Hermon Road 
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of the children of the root. Since node A 
is not the goal, one of A’s children is ex- 
amined while other children of A are ig- 
nored. Node B is not the goal, so the 
search moves downward. In this case, 
goal G is found. If the goal is not found, 
the search backtracks to the last node 
where there was a search and examines 
the other child of that node or begins the 
downward search again. 

The breadth-first search (Figure 3) 
moves back and forth, searching the tree 
level by level as far across as possible be- 
fore starting down a level. It goes first to 
A, one of two children of the root node 
O. But, rather than examining the chil- 
dren of A, it moves to the other child of 
O, node D. It moves back to A’s ‘child, B, 
and eventually returns with the informa- 
tion that O to A to G is a successful 
search—and the shortest solution se- 
quence. Breadth-first search guarantees 
that the shortest path will be found if 


Breadth-first search 


(Origin) 
A—— D (Nodes) 
oad | 
B E 
| | 
Cc G_ (Goals) 


Cycles through and returns OAG as path 
from origin to goal. 


Figure 3. 


; Call with: (depth-first 'O 'G) 
A is successful. 


(define depth-first 
(lambda (origin goal) 


any path exists. Depth-first does not nec- 
essarily take the short route at all. 

Note that each method produced a 
correct route to the goal following differ- 
ent paths. A breadth-first search eventu- 
ally finds a path to the goal, if such a 
path exists. A depth-first search, on the 
other hand, could go down a wrong and 
perhaps infinite path, endlessly visiting 
children even though a finite path to the 
goal exists somewhere else in the tree or 
network. 

Any problem represented in a search 
tree like this one, which could also be a 
network, can be attacked with depth-first 
and breadth-first searches, regardless of 
its content. Which approach will lead to 
the solution more quickly is a separate is- 
sue. While the searches might eventually 
solve a problem with a large state space, 
they are not appropriate there. 

In practice, depth-first and breadth- 
first methods can be combined. A low- 
depth or depth-bound boundary can be 
defined within the search space. Search 
proceeds depth-first until the boundary is 
reached and then backtracks to the last 
node where there is a choice and begins 
the depth-first search again. If the upper 
space is exhausted without success, the 
boundary can be lowered and the depth- 
first process repeated. 

But even under these circumstances a 
depth-first search will not necessarily 
find the shortest path from origin to 
goal. If an evaluation function is avail- 
able, the most likely search area can be 
identified before searching. Such a func- 
tion may not be available, so we will lim- 
it ourselves to simple searches for now. 

It would seem that breadth-first search 
is the better of the two. Whether this as- 
sessment is true or false depends a great 


Depth-first search basic program in LISP 


returng-#!TRUE is depth-first search from origin to goal 


(deep (list origin) goal))) :make a list of origin 


(define deep 
(lambda (path goal) 
(cond ((eq? path '()) *()) 


((eq? goal (car path)) t) 


(else (deep 


parguments to function “deep” 
jreturn #!FALSE if path is empty 


;return #!TRUE is goal found 
ptry again 


(append (expand {car path)) ;new node at head of path 
(cdr path)) goal))))) :rest of path 


(define (expand node) 
(getprop node ‘children) ) 


(putprop 'O ‘(A D) ‘children) 
(putprop ‘A '(B G) 'children) 


(putprop 'B '(C) ‘children) 

(putprop 'C ‘(G) 'children) 

(putprop 'D ‘(E) ‘children) 

(putprop 'E '(G) ‘children) 
Listing 1. 


iget node information from 
;property lists 


jproperty lists for nodes 


deal on memory because breadth-first 
search is memory-intensive. Breadth-first 
search must remember every node visited 
on the prior level or levels. Depth-first 


Depth-First search in LISP 
Call with: (depth-first 'O 'G) 


me te te 


define depth-first 


search need only remember every node (lambda (origin goal) 
on the direct path to the root. For a dou- (deep (list (list origin)) goal))) ;make a list of a list of origin 
ble-branching search tree _n_ levels deep, ; 
a breadth-first search must remember ee ee ee 
2**(_-1) previous states. Depth-first eee Gi aany ho 
q : (cond ((eq? path *()) '()) 
needs to remember only __n_ As _n_in- ((eq? goal (caar path)) (reverse (car path))) ;refine comparison 
creases, the load for breadth-first search- (else (deep jand return path on 
es can explode. (append (expand (car path)) 
(cdr path)) goal))))) ;which goal found 
he listings gig (define (expand path) 7get path, find children of each node 
straightforward (map (lambda (child) (cons child path)) ;and return list of new 
and can be used (getprop (car path) 'children))) paths, each with a child added. 
as a model for such famous problems 
and puzzles as the Missionaries and Can- (putprop 'O ‘(A D) ‘children) | 
nibals, 15-tiles, and Traveling Salesman. (putprop ‘A ‘(B s) children) 
ene t tline f (putprop 'B '(C) ‘children) 
isting 1 creates an outline for a (putprop 'C °(G) ‘children) 
depth-first search. Its arguments are the (putprop 'D '(E) ‘children) 
origin node and the goal node, making a (putprop 'E '(G) 'children) 
list to work with. As the search proceeds, 
it checks to see if the goal node has been Listing 2. 


reached or expands the next node on the 
path to see if its child is the goal, and so 
forth. The data about nodes is stored in a 
property list, although it could also be 
represented in a complex list. This out- 


THE TOOLS YoU NEED 
AT A PRICE YOU’LL LIKE 


Supports all index file operations. Very quick 
sequential or random access, duplicate keys, multiple 75.00 
indices, fixed and variable length data records are all‘supported. 


Works on top of BTree to provide a simple, yet 
powerful application program/file system interface. 40.00 
Complex filesystem manipulation becomes a snap. Provides the power 
of a database manager with the flexibility of a programming language. 


Finally, a completely device independent printer library! 
Ip drives any printer as accurately as possible and allows easy access to 75.00 
its most sophisticated features. Multiple fonts, multi-column output, complex margin 
formatting, and much more. Pays for itself the first time it’s used. 


The ultimate ‘make’ utility. We couldn’t find a good one, so 
we wrote a great one. Has all kinds of powerful features including wild 59.00 
card filename expansion, nested macros, and multiple dependency and rules defini- 
tions. Ready to go for MS-DOS; C source is there if you use another operating 
system. 
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Each product includes a typeset manual, example programs, and complete C source Oakvill 2 O Aye é G d 
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)/” An Easy 

4 To Use System 
For Writing 
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C 


Programs 


Quic-PRO 5™ 


5th Dimension Software 
Development 


Quic-PRO 5”™ is a complete 
applications development system 
that allows fast application 
development for non-professionals 
and pros alike. 


System includes: 

®@ Applications generator 
@ 4th generation language 
@ Query language 

@ Report generator 

@ C translator 

@ Datalite C compiler 

@ File handler 


Fantastic Value! 


Complete system 
(Single user) 


LAN all memory 
models (Multi user) 


Requires: PC/MS-DOS, 512 RAM, 
Hard Disk 


30 Day Guarantee 
Dealer Inquiries Invited 


Ci0-2 international 


136 Granite Hill Court 
‘Langhorne, PA 19047 
(215) 968-5966 
VISA/MasterCard call collect 
for credit card order. 


=e See] 

Depth-first search and breadth- 
first search characterize two kinds 
of waaiggireccl’y associated with 

uman beings 


line version cannot tell us anything about 
its path, however, and only returns true 
or false. It is a useful way to get the ba- 
sic ideas. 

Depth-first searching is more powerful 
in Listing 2. It adds the ability to get the 
children of the last node in the current 
path and produce a list of new paths. 
Each new path has added one of its chil- 
dren. After modifying the search method 
for your version of LISP, it will be useful 
to run it with trace on and study the ex- 
pansion procedure. 

Breadth-first searching (Listing 3) re- 
quires only slight modifications to the 
depth-first search (Listing 2). Instead of 
placing new nodes at the front of the 
path with (append (expand (car path))... 
it puts them at the end with (append (cdr 
path) (expand (car path).... 

Next time I will explore the A* algo- 
rithm, also known as the optimal search 
for the optimal path, and best-first 
searches, building from the trees and list- 


ings here. [Fi 
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(breadth (list (list origin)) goal))) 


(define breadth 
(lambda (paitit goal) 
(cond ((eq? path '()) '()) 


((eq? goal (caar path)) (reverse (car path) )) 


(else (breadth 
(append (cdr path) 


ronly change from depth-first 


(expand (car path))) goal))))) :new nodes to end 


(define (expand path) 


(map (lambda (child) (cons child path)) 


(getprop (car path) ‘children) )) 


(putprop 'O ‘(A D) ‘children) 
(putprop ‘A '(B G) ‘children) 
(putprop 'B ‘'(C) ‘children) 
(putprop ‘C '(G) ‘children) 
(putprop 'D '(E) ‘children) 
(putprop 'E '(G) ‘children) 


Listing 3. 


ACCELERATE YOUR 


C DEVELOPMENT eet 4 


RTC piu 


FORTRAN/RATFOR TO C TRANSLATOR* 


[=] RTC Plus supports stan- 
dard FORTRAN-77 as well 
as some DEC VAX ex- 
tensions (excluding 


Maximize the vast re- 
sources of FORTRAN 
while moving up to C. 
Speed up new C devel- 
opment and avoid re- FORTRAN I/O, character 
inventing the wheel. and complex statements/ 

[=] Use RTC Plus to translate expressions). Over 95% of 

FORTRAN code and librar- STUG’s RATFOR is sup- 

ies — and maintain code ported. The Translator 

with greater ease and generates K&R C. 

flexibility in C. Finally a cost-effective 

Source code to C librar- method of conversion into 

ies is included. Cc. 


| 


DEMO $10 
MS-DOS $450 


*Translate: “To convey to heaven without natural death.” 
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1683 MILROY, SUITE 101, SAN JOSE, CA 95124 
408-723-0474 
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NEW! 
FASTER THAN EVER! 
DeSmet C v3.0 


FASTER C DEVELOPMENT 


Invoke the DeSmet C compiler fromthe SEE'™ full screen editor and 
the first error will return you immediately to SEE at the error line with 
the error message displayed. 


FASTER COMPILATION 


When you don't use inline assembly code or don't want to see the 
ASM88 output, the V3.0 compiler produces object code directly - 
making DeSmet C up to twice as fast as before. 


PLUS EXPANDED STANDARD LIBRARY 


Networking, path, file, time, enhanced string functions, environment 
support now included. 


FULL FEATURES WITH EVERY PACKAGE 
—— ONLY $109 —_ 


C Compiler, Assembler, Binder, Librarian, Execution Profiler, Overlays, 
8087 and S/W Floating Point, Full STDIO Library and Full Screen Editor 
(SEE), 

’ ‘Debugger and Large Case options available at $50 each. 


C Ware Corporation 
P.O. Box 428, Paso Robles, CA 93447 USA 
Telephone: (805) 239-4620 Telex: 358185 
We accept VISA, MC & AMEX. Call now and we'll ship today. 
Street Address: 945 Spring #14, Paso Robles, CA 93446 


Create 68K Embedded 


Systems On ATs 


Oregon Software Brings VAX and VME 
Pascal-2” Cross-Development Tools 
To MS-DOS Workstations 


Get All Your Tools In One Package | 


The Pascal-2 Cross-Development System gives you 
price/performance value that beats high-priced work- 
stations. Compare these features and call 

for further information. 


Compiler 


68000, 68020, and 68881 instruction sets 
ROMable code 

reentrant code 

separate program sections for code and data 
easy access to hardware through fixed memory 
locations (I/O space) 


Assembler-Linker 


m= VERSAdos compatible output 
B easily linked, relocatable S-record format 


Concurrent Program Support 


™@ process synchronization primitives for creating a 
multiprocessing real-time kernel 

@ interactive post-mortem analyzer 

= software-selectable interrupt levels 


Stand-Alone Library 


source supplied: users may adapt code as needed 
user programs that run without an operating system 
or other real-time kernel 

compact code for extremely smaii ROM programs 
or limited memory devices 

ability to write device drivers in Pascal or assembly 
code 

user-customized system services or control programs 
easily-gathered performance analysis statistics 


Source Management 


a version-control system to track and identify each 
phase of development j 

optional branching to multiple versions from a single 
source 

automated rebuilding of programs from component 
modules (a Unix-style Make function) 
arestricted-access system for coordinating revisions 


800-367-2202 


6915 SW Macadam Avenue, Portland, Oregon 97219 U.S.A. 
503-245-2202 FAX 503-245-8449 TWX 910-464-4779 


The following are trademarks: Pascal-2, SourceTools, and Oregon Software. 
Oregon Software, Inc., VAX and VMS Digital Equipment Corporation, UNIX, AT&T 
Bell Laboratories, Incorporated. MS. and MS-DOS are registered trademarks of 
Microsoft Corporation. 
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Plus 


Building an interactive application 
in C? PANEL Plus provides the 
features you need for professional 
program development: 


PRODUCTIVITY 


The PANEL Plus interactive screen 
design tools are the fastest way to 
get your application screens set out 
and tested. Just type ae on 
the screen, mark out entry fields, 
define display and entry attributes, 
help boxes, borders, pop-up areas. 
Fields can be edited, moved and 
resized, and validation details 
entered — with the screen displayed 
so that you can see the effect of 
your changes. 


Then PANEL Plus saves your work 
to disk, from where you can either 
load the design directly into your 
application program, or for better 
control, automatically generate C 
data structures, field areas, and 
header files which are compiled 
and linked into your program. 


PANEL Plus screens can include 
all the features demanded by 
today’s applications. Several 
different menu types are provided, 
including highlighted bars with 
help lines. Easy-to-use library 
functions support pop-up fields, 
horizontal and vertical scrolling in 
a field, and validation exits for 
supplied or custom data checking 
functions. Text functions can also 
be carried out in graphics mode 
using a supported graphics 
function library. 


PANEL 


<= 


fey 


Advanced Screen Manager 


EASE OF USE 
Although the library contains over 


150 functions, it is logically 
pera so that most programs 


only need to use a small subset. 


Users of Roundhill’s PANEL 
packs will find that the old calls 

ave been emulated (and all 
screens are compatible). New, 
expanded documentation is 
provided with examples of all the 
main function calls. PANEL Plus 
includes full library source, with 
variant files for all supported 
systems, and no royalties are 

ayable for the use of PANEL Plus 

ibraries when linked into user 
applications. 


PORTABILITY 


PANEL Plus is designed to allow 
your programs to be ported to just 
about any environment where you 
can find a C compiler. Every 
version of PANEL Plus includes 
source modules.for interfacing to 
all of the following environments: 
MS-DOS/PC-DOS (portable and 
memory-mapped), OS/2 protected 
mode, Amiga Intuition, Unix (with 
and without termcap or termio), 
Xenix, DOS-J (including Asian 


Roundhill Computer Systems Limited 
PO Box 8107, Englewood NJ 07631 


Roundhill Computer Systems Limited 


PO Box 14 Marlborough SN8 1LR England 
Telex (UK): 444453 AWARE G 


Fax (UK): (0672) 54436 


Roundhill Computer Systems 


CIRCLE 49 ON READER SERVICE CARD 


New! 


Roundhill announces two screen 
tools for use with the exciting new 
C compilers from Borland and 
Microsoft: 


PANEL/TC — $129.00 


For use with Borland’s Turbo C 


PANEL/QC — $129.00 
For use with Microsoft’s Quick C 


Each package is configured for 
use on an IBM PC or compatible 
system, and screens can be 
esigned and built into your 
programs while running in the 
special development environment 
provided with the compiler. 


All the PANEL Plus library 
functions are supported, and 
source code for every validation 
function is provided so that you 
can customise the entry checking 
to suit your application. When 
you need to move your programs 
to other environments, or need 
the full library source for other 
reasons, upgrades to PANEL Plus 
are available. 


PANEL/QC can be run in any of 
the graphics modes supported by 
Quick C, and also interfaces to 

Microsoft C VS. 


16-bit character editing), and 
VAX/VMS. Graphics libraries 
supported include MetaWindow, 
HALO, Essential Graphics, and 
Microsoft C V5. The Microsoft 
mouse can be used in PC versions. 


PANEL Plus for MS-DOS, with full 
library source, is priced at $495.00. 
Versions are available for the 
Manx Aztec, Borland, Lattice, 
MetaWare, Microsoft, and Wizard 
C compilers. Please call for prices 
of PANEL Plus for Xenix and Unix 
systems, and for VAX/VMS. 
Existing registered users of 
PANEL will receive a credit 
against the PANEL Plus license fee. 


(201) 569 2265 
(0672) 54675 


BIX: join roundhill 


== EXOTIC LANGUAGE 
=== OF THE MONTH CLUB 


uring was de- 
signed in 1982 at 
the University of 


Toronto, Ont., Canada, the outcome of 
more than two decades of research in the 
design of programming languages. Since 
1983 it has been the main teaching lan- 
guage at the University of Toronto. 

The briefest way to describe the lan- 
guage is as a super-Pascal with a no-frills 
syntax and an airtight mathematical 
definition. Turing contains all the fea- 
tures of standard Pascal, as well as mod- 
ules, convenient strings, and I/O. Its 
syntax is very easy to learn. 

Turing runs on IBM PC compatibles, 
SUN/68000 workstations, UNIX/VAX 
minicomputers, and IBM mainframes. It 
is supported by a compiler, interpreter, 
and integrated programming 
environment. 

Its mathematical definition ensures 
that Turing programs can run on person- 
al computers, workstations, minicom- 
puters, and mainframes, and guarantees 
portability as Turing programs are 
moved from one computer to another. 

I will introduce Turing’s features using 
a sequence of examples. The first is a 
simple but complete Turing program that 
prints a triangle of stars (*): 


* 
oR 
A 


The Turing program to print this pattern 
is: 

var s: string := “*” 
loop 


end loop 


The first line declares character string 
variable s, initialized to a single star. The 
statements between loop and end loop are 
repeatedly executed. The value of s is 
output by the put statement. In the as- 


Turing: More powerful than Pascal 
nr —.__T (Cl 


By R.C. Holt 


signment statement, the plus sign (+) 
catenates a star to the end of s. 

The loop in this example will eventual- 
ly create a string whose length exceeds 
the implementation-defined maximum 
string length, standardized to be at least 
255 characters. When this happens, ex- 
ecution stops with an error message (as- 
suming run-time checking is enabled). 

Turing uses free-format programs, so 
this example could be written on one line 
or broken into more lines. Note the ab- 
sence of a header line such as program 
test(input, output) and semicolons. 

The declaration given on the first line 
can be shortened to: 


RN 


vars = 


The type (string in this example) can be 
omitted from a declaration when initiali- 
zation is present. Although not illustrat- 
ed here, nonscalars, including arrays and 
records, can also be initialized in their 
declarations. 

The following example program reads 
a file (stream) and outputs all lines con- 
taining the string “iron.” 


% Read file, print lines containing “iron” 
var line: string 
varn := 0 
loop 
exit when eof 
n:=nt ] > 
get line: * 
if index(line, “iron”) not= O then 
put n:4, “", line 
end if 
end loop 


The first line contains a comment that 
begins with a percent sign (%) and ex- 
tends to the end of the line. Variable x is 
declared as an integer, taking its type 
from its initial value (zero). 

The loop is executed repeatedly until it 
reaches end of file (eof) in the input 
stream. The get statement uses the nota- 
tion Jine: *, which means that an entire 
line will be read into the variable called 
line. Alternate formatting notations in 
the get statement read tokens (words) us- 
ing automatic blank skipping or a speci- 
fied number of characters. 

The function call index(line, “iron”) 
returns zero unless the string “iron” ap- 


pears in the line. Note that the if state- 
ment ends with end if, just as loop ends 
with end loop. Similarly, each case state- 
ment ends with end case and each for 
statement ends with end for. 

When the put statement is executed, it 
prints line number n in a field of width 
4, then prints a blank, and finally prints 
the line. For example, lines 8 and 52 
might be printed as: 


8 and yet iron combines in two 
52 mix carefully with iron filings, then 


The get and put statements illustrated 
here can be applied conveniently to other 
I/O streams. For example, a file called 
master is read from and a file called 
newmaster is written to as: 


var m, nm: int 
open(m, “master,” “r”) 
% Reading = “r” 


open(nm, “newmaster,” “w”") 
% Writing = “w" 

get :m, x 

put :nm, x 


uring provides 
convenient con- 
structs to deal 


with arrays whose size is not known until 
run time, as illustrated in the following 
program. 


% Read and sum a list of numbers 
var n: int 
getn 


var a: array 1..n of real 
% Run-time upper bound 


function sum(b: array 1..* of real): real 
var total: real := 0.0 
for j: 1..upperlb) % For each element 
total := total + bij) 
end for 
result total 
end sum 
... compute elements of array a ... 
put “Sum of array: ”, sum(a) 
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The value of n is read by executing a get 
statement and determines the size of ar- 
ray a. The scope of variable a begins 
with its declaration and lasts to the end 
of the surrounding block; that is, to the 
end of the program. This is exactly as if 
a begin block started just before a’s dec- 
laration and extended to the end of the 
current block. 

In Turing, a declaration can appear 
wherever a statement can appear. This 
flexibility helps modularize programs by 
making it convenient to place declara- 
tions where they are actually needed, 
rather than forcing them to be more 
globally visible. 

The header for the swum function de- 
clares that its parameter b is an array of 
real numbers whose lower bound is | and 
whose upper bound is determined by the 
argument to the function. Any array 
whose lower bound is 1 and whose ele- 
ment type is real can be passed as an ar- 
gument to b. Turing’s type compatibility 
rules consider arrays to be of equivalent 
types whenever their bounds are equal 
and their element types are equivalent. 

The rule for arrays is structural equiv- 
alence (based on form) rather than Pas- 
cal’s rule, which is name equivalence 
(Pascal requires identifiers for parameter 
types). 

As in Pascal, parameters in Turing can 
be declared var or nonvar. Assignments 
to var parameters cause changes to the 
corresponding argument (actual parame- 
ter). In Turing (as opposed to Pascal) 
nonvar parameters are considered con- 
stants, and cannot be assigned to. 

Since Turing disallows side effects in 
functions, it bans var parameters from 
functions. Turing generalizes the concept 
of a constant to include values that are 
computed at run time but cannot be 
modified. 

This means that for any particular call 
to sum, the value of 5 necessarily re- 
mains unchanged, although another call 
may have a new value for b. Consider 
the declaration: 


const answer := sum(a) 


Like array b; answer is considered a con- 
stant. Like b, it is a run-time rather than 
a compile-time constant (because its val- 
ue is not known until run time). 

A for loop in Turing creates (declares) 
a counter, which is 7 in the swm example. 
During each iteration of the loop, j is 
considered a constant, and the compiler 
guarantees that the user cannot modify /. 
Turing’s for loops, like Pascal’s, can be 
either increasing or decreasing. Turing 
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Turing contains all the 
features of standard 
Pascal, plus modules, 
convenient strings, 
and I/O 


allows the range to be a subrange type 
name, as in: 


type pixelRange: 1..472 
var line: array pixelRange of 0..7 
for i: pixelRange 
line(i) := 0 
end for 


The value of the sum function is given 
in the result statement, which is similar 
to a valued return in PL/I or C. In Tur- 
ing, the keyword return is used for ex- 
plicit completion of a procedure or the 
main program. 

The following function illustrates the 
use of string operations. This function 
accepts integer i, representing pennies, 
and returns an equivalent dollar string. 
For example, if i is 5 then the dollar 
string will be $0.05. 


function intDollar(i: int): string 
% i must be non-negative 
% result is dollar string 
var t := intstr(i) 
if length(t)=1 then 


t= 400" cr t 
elsif length(t)=2 then 

t:= “Oo” +t 
end if 


% t is now at least 3 characters long 
result “$” + #(1..*-2) + “.” 
sf a=iltees) 
end intDollar 


Function intDollar uses intstr to convert 
integer 7 to string*t- Turing provides a 
complete set of conversion functions, in- 
cluding realstr, strint, strreal, floor, and 
ceil. 

This example contains an elsif clause, 
used for cascaded selections. The if state- 
ment is used to extend ¢ on the left to at 
least three digits long, so if i is 5, then t 
becomes “005.” The result statement 
uses substrings, written as ¢(L..R), where 
L gives the left position of the substring 
in t and R gives the right position. The 
star (*) used in writing L and R repre- 
sents the length of t. The four strings 
catenated in the result statement are: 

@ The dollar sign “S$”. 

w The digits of t up to but not including 
the last two digits, written as ¢(/..*-2). 

w The decimal point “.”. 

w The last two digits of t, written as 
i(t=12*): 


A substring can select a single character 
(a string of length 1) by using a single 
position; for example, ¢(1) is the first di- 
git of t and t(*) is the last digit of t. 

This program illustrates the common 
Turing style of using uppercase letters to 
start a word occurring in an identifier; 
for example, D in intDollar. Unlike Pas- 
cal, Turing is sensitive to capitalization 
unlike Pascal; while Pascal considers 
inTDolLar, Intdollar, and iNtDoLIAr to 
be equivalent, Turing considers them to 
be distinct. 

Turing includes a set of assertions 
(pre, post, assert, and invariant) that 
specify requirements for programs. We 
will illustrate assertions by rewriting the 
intDollar example to replace each of its 
comments by an assertion. 


function intDoliar(i: int) s: string 
pre i >= 0 
post s(1)=“$" and s(*-2)="." and 
i=strint(s(2..*-3) +s(*-1..*)) 
var t: string := intstr(i) 
if length(t)=1 then 
t:= “O0"+t 
elsif length(t)=2 then 
fern O ert 
end if 
assert length(t) >= 3 
result “$" + +#(1..*-2) + “.” 
ae t(*= 1.7) 
end intDollar 


We have declared a name s for the result 
of the function by inserting s into the 
function header preceding the function’s 
result type. The only place s can be used 
is in the post condition, because s’s value 
only becomes available when the result 
statement is executed and the function is 
returning. 

The pre condition is a requirement the 
caller must satisfy; intDollar must be 
called only with a non-negative argu- 
ment. The post condition is a require- 
ment the subprogram must satisfy; the 
result s of intDollar must yield a true 
post condition. Each assert statement ex- 
presses an assumption about the state of 
a program. The assumption in this exam- 
ple is that following the if statement, ¢ 
contains at least three characters. 

By default (that is, with “faithful ex- 
ecution”) these assertions are checked at 
run time, although the compiler may 
omit a check if it can prove that the con- 
dition can never be violated. We have re- 
placed comments with assertions in the 
example and can consider these asser- 
tions executable comments. 


The compiler generates code to check 
the assumptions made in these assertions. 
Note that an error can exist in the as- 
sumption (assertion) as well as in the 
program proper. In a time-critical pro- 
duction program, the programmer can 
remove these checks and the overhead 
they imply by recompiling with a request 
to remove checking. 

Turing’s formal semantics define a 
precondition for the entire program that 
must be satisfied by the input data if the 
program is to meet its specification. If 
the input data satisfies this precondition, 
each assertion will be true when 
executed. 

In this case, we do not need to check 
the assertions at run time since they are 
guaranteed to be true. For example, in 
the intDollar function, if i is always non- 
negative, run-time checks of its assert or 
post conditions are unnecessary. 

We will not give examples of invariant 
assertions, which are used to give re- 
quirements for loops and modules. 


uring’s versions of 
Tinnes and dy- 

namic storage al- 
location are similar to corresponding 
features in Pascal. However, in Turing 
dynamically allocated objects are divided 
into distinct collections. 

A collection can be thought of as an 
array that initially has no elements. The 
new statement is used to add elements to 
the collection and the free statement de- 
letes items from it. Given collection c 
with pointer p, these two statements have 
the form: 


newc,p  % Create new element of c 
% located by p 

freec,p % Delete the element of c 
% located by p 


After the element has been created, but 
before it has been deleted, it is refer- 
enced as c(p). 

The following example illustrates a 
singly linked list implemented using a 
collection called /ist. Each node of the 
list contains a name field and a link to 
another node. The notation nil(list) re- 
presents a null pointer for this collection. 


% FIFO, singly linked list of names 
var list: collection of 
record 
next: pointer to list 
name: string(30) 
end record 
var first, last := nilllist) % Empty list 


procedure append(p: pointer to list) 
if first=nilllist) then 
first := p 


The Advanced Programmer's Editor 
That Doesn't Waste Your Time 


e Fast, EMACS-style commands—completely reconfigurable 

e Run other programs without stopping Epsilon—concurrently! 
e C Language support—fix errors while your compiler runs 

e Powerful extension language  e Great on-line help system 
e Multiple windows, files e Regular Expression search 
e Unlimited file size, line length e Supports large displays 

e 30 day money-back guarantee e Not copy protected 


Only $195 
Lugaru 


Software Lid. ( 


5740 Darlington Road J : 
Pittsburgh, PA 15217 for IBM PC/XT/AT's or compatibles 
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Books 
to help you 
C better 


Supercharging C with Assembly 
Language by Harry R. Chesley and 
Mitchell Waite gives programmers familiar 
with C and the IBM PC tips on creating 
faster, more powerful and more responsive 
C programs by combining its versatility 
with that of assembly language routines. 
The book includes techniques, examples 
and programs, and topics from how to 
encrypt and decrypt files to how to display 
fractals on the EGA. 
The C Toolbox by William James Hunt 
offers experienced programmers valuable 
C tools and complete programs for creating 
B-Trees, terminal emulation, sorting and merg- 
ing, error handling, and file I/O and bit operations. , 


As seen in 
Com Amnbrica feed t6- ~ 
wi Wald be 4 
NewsLink qgigenDOoOoKS 
Books + Audio + Video * Magazines « Book Clubs + Special Orders 
Over 1000 stores nationwide. 


Check your local yellow pages for the Waldenbooks nearest you. 
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Dbasex 


orogramming tools 


*Clioper, FoxBASE+, 
dBASE, QuickSilver 


The UI Programmer 


Ul is the first professional code generator; we 
wrote UI for programmers who want to automate 
their work but cannot use code that is ‘almost’ 
good enough. If your user interfaces include 
bounce-bar menus, pop-up help screens and 
the other features of today's best programs, you 
will gain an order of magnitude in productivity 
with UI. 


Ul is a second generation, programmable pro- 
duct — so your code comes out your way. 
Application specific edits, for instance, can be 
placed in the UI ‘template’ which controls the 
generation. Edit the screen appearance until it 
‘looks and feels’ perfect. Everytime you generate 
code, your special logic is preserved. 


Speaking of editing the screen, Ul includes a 
powerful, 3-D screen editor, so you can draw 

pop-up help boxes over your pull-down menus, 
over your application. 


The Documentor 


To run Doc, you just tell it the name of the main- 
line routine and make sure your printer has a lot 
of paper! (Sure, you can have the output go to 

the screen or a file, too.) 


You can tailor your documentation to include any 
or all of: a table of contents, system tree diagram 
(main line is the root), hierarchy (box diagram) 
charts for each module, action diagrams (modern 
style flow charts) for each PRG or procedure, 
DBF listings (structure, indexes, more), where 
used/updated listings for fields and all variables 
— by module and by line number within each 
module. 


Our written money-back satisfaction guarantee 
set a new standard when we began it in 1985. 

(Return rate to date: 0.6% and dropping!) No 
copy protection, royalties or other nonsense. 


Suggested retail: $295 each, (800) support 
included. At your dealer today. Call us for a very 
special offer on our latest release! (800) 233- 
3569 or, in NY, (212) 406-7026. 


~ WallSoft 


The Computer Aided Software 


Engineering Corporation 
233 Broadway, Suite 869, New York, NY 10279 
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else 
list(last).next := p 
end if 
last := p 
list(p).next := nil(list) 
end append 


var item: pointer to list 

new list, item % Allocate a node 

listlitem).name := “A.M. Turing” 

appendlitem)  % New node goes onto 
% queue 


Notice that referencing an element of ar- 
ray a with subscript i, as in a(i), is nota- 
tionally similar to c(p). This similarity is 
called uniform referents; it allows us to 
write much of a Turing program without 
regard for whether a data structure is 
represented by an array or a collection. 
The similarity also means that collections 
can be formally defined in much the 
same manner as arrays. 

Turing supports a version of variant 
records called unions. A union is a type 
whose selection of active components (al- 
ternatives) can be changed during pro- 
gram execution. A union allows storage 
to be shared among the values of the dif- 
ferent alternatives. Listing 1 illustrates 
the use and initialization of unions and 
introduces enumerated types. The exam- 
ple represents vehicle registration 
information. 

The vehicle is a passenger car, farm, 
or recreational vehicle. If it is a passen- 
ger car, we need to record the number of 
cylinders it has. If it is a farm vehicle, 
we need to record its class, such as 
“dairy,” in a string of no more than 10 
characters. Otherwise, it is a recreational 
vehicle and no further information is 
recorded, 

The first line of Listing 1 creates the 
enumerated type called vehicle. This 
type has three values, each of which is 


type vehicle: enum(passenger, 
farm, recreational) 
type vehicleRecord: 
union kind: vehicle of 
label vehicle.passenger: 
cylinders: 1..16 
label vehicle.farm: 
farmClass: string(10) 


written as the word vehicle, followed by 
a dot, then the enumerated identifier, as 
in vehicle.farm. By contrast, in Pascal an 
enumerated value is given simply by its 
name, such as farm, and does not require 
the prefix vehicle. 

The trouble with Pascal’s approach is 
that the scope of its enumerated identifi- 
ers is confusing, especially when the enu- 
merated type is defined inside other 
types, name conflicts exist, or enumer- 
ated types are exported from modules. 

Turing’s approach treats enumerated 
types much like records, and access to 
enumerated values follows the same ruies 
as access to record fields. This reduces 
confusion and simplifies the 
implementation. 

In the example union type, the tag 
(kind) determines the active alternative 
of the union. Variable v is initialized in 
its declaration to set its tag to farm and 
its farmClass to “dairy.” (This initializa- 
tion is optional.) Any attempt to access 
the cylinders field while the tag is equal 
to farm would be detected at run time 
(assuming faithful execution). 

Changing the tag candestroy the con- 

tents of all fields (and actually does un- 
der faithful execution). Note that when 
kind is equal to recreational no active 
fields other than kind exist. 
. If there are common fields across all 
alternatives of a union, these fields are 
declared in a record type that contains 
the union as one of its fields. 


uring replaces .=—~ 
Pascal’s with con- 


a struct with a bind 
construct. Consider the declarations: 


type [es 
record 


s, t: string(10) 
i: int 


label: % No fields for “otherwise” alternative 


end union 


var v: vehicleRecord := init(vehicle.farm, “dairy”) 


% Initialize tag and farmClass 


v.farmClass := “vegetable” % Checks that tag is farm 


tag vy, vehicle.passenger 
v.cylinder := 4 


Listing 1. 


% Checks that tag is passenger 


end record 
var a: array 1..500 of r 


bind var x to ali) 
x. := “Hughes” 


The bind is a declaration that creates 
variable x to correspond with the jth ele- 
ment of array a. We can think of x as a 
var formal parameter whose argument is 
a(j). Any change to x is a change to a/(j). 
If the keyword var is omitted, x can be 
inspected but not modified. By compari- 
son, in Pascal we would have: 


with alj] do 

begin 

s := “Hughes” 

end 
The with construct makes the fields of 
a[j] directly visible. 

The bind offers several advantages 
over with. The most important is that the 
name introduced in a bind allows more 


than one set of fields of the same record 
type to be accessed at once, such as: 


bind var x to ali), y to ali) 
Xe Ses aValt 


In Pascal, we cannot write the corre- 
sponding program. We can try: 


with ali], alj] do ... 


However, the fields of a/i/ are hidden by 
the fields of a/j/, so only fields of a/j/ 
are visible. 

Since bind renames a variable (or part 
of a variable), it is a potential source of 
aliasing. This possibility is prevented by 
a set of restrictions, the essential one 
stating that the variable bound to is not 


function integrate(function 
f(x:real): real, 
left, right: real, 
n: int): real 
const width := (right-left)/n 
var sum := 0.0 
for i: }..n 
sum := sum + flleft + i*width) 
end for 
result width*sum 
end integrate 


% Example integration 


accessible during the scope of the bind. 
This restriction means array a cannot be 
accessed during the scope of x. 

We will now illustrate parametric sub- 
programs in terms of an algorithm to ap- 
proximate the definite integral of 
function f (Listing 2). 

When this program is executed, it 
prints: 


Integral of cos from zero to pi is 0.00 


The first lines declare that parametric 
function f has a real parameter and a 
real result. The integrate function re- 
ceives as parameters function f, the Jeft 
and right ends of the range of integra- 
tion, and number zn of slices to be-used in 
the approximation. The value of the 
width of a slice is computed as a run- 
time constant. The type of sum is real, 
because its initial value 0.0 is real. The 
put statement illustrates explicit control 
over field width (4) and fractional digits 
(2) to be displayed; the number of expo- 
nent digits can also be explicitly 
controlled. 

Perhaps the most important program- 
ming construct introduced into program- 
ming languages in the last decade is the 
module, also known as the class, cluster, 
or package. Modules support information 
hiding by providing a method to control 
access to declared items. 

The following is a simple module that 
exports two subprograms. The first sub- 
program, called enter, is used to add in- 
tegers to a set of integers. The second, 
called member, determines whether a 
given integer is in the set. The best data 
structure and algorithms for implement- 
ing enter and member depend on the 
range of integers to be entered, as well as 
the frequency of execution of each of en- 
ter and member. If the range is small— 
say, zero to 20—we should use Turing’s 


put “Integral of cos from zero to pi is ", integrate(cos, 0.0, 


Listing 2. 
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set type to implement these subprograms 


directly, as shown here: 


module iniset 
exportlenter, member) 
const minval := 0 
const maxval := 20 


type smallset: set of minval.. maxval 


var s:= smallset()  % Empty set 


procedure enter(i: int) 
s:= s + smallset(i) 


end enter 


function member(i: int): boolean 


intset.enter(9) % Add 9 to the set 
if intset.member(4) then 
% Is 4 in the set? 


The set types of Turing are like the sets 
of Pascal, except that Turing set con- 
structors use the name of the set type. 
For example, the empty set in the pre- 
vious example is written in Turing as 
smallset() instead of //, as it would be in 
Pascal. The difficulty with Pascal’s nota- 
tion is that the type of set constructors, 
such as //, is ambiguous. 


result i ins If the range of integers increases 
end member greatly—say to zero to 5,000—yet only a 
end intset few members will be entered into intset, 
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then our implementation of the intset 
module should change to use arrays or 
collections. This sort of change is typical 
in program maintenance. 

Information about intset implementa- 
tions is hidden inside the module (be- 
cause nothing is exported but the 
subprograms). We can safely reimple- 
ment the module using collections, for 
example. We are guaranteed that no oth- 
er part of the program can be dependent 
on the set type used in the current 
implementation. 

Turing is a puritanical language, 
meaning that it never allows you to gain 
access to the underlying hardware. This 
approach has the advantages of guaran- 
teeing portability and enforcing the 
structure and cleanliness that are the ba- 
sis of good software engineering. 

However, certain programming tasks 
require sneak access to hardware. Turing 
Plus is a compatible extension of Turing 
(any Turing program is also a Turing 
Plus program) that relaxes the lan- 
guage’s puritanical philosophy. 

Turing Plus supports different sizes of 
numeric types, separate compilation of 
subprograms and modules, type checks, 
peek and poke, exception handling, and 
concurrency. Turing Plus is designed to 
handle applications in which assembler, 
C, or Ada might otherwise be appropri- 
ate. The portable compiler for Turing 
Plus is now in beta testing. 

An introductory programming text- 
book called Introduction to Computer 
Science Using the Turing Programming 
Language is available from Prentice- 
Hall. A forthcoming book describes the 
methods of designing and formally speci- 
fying the Turing language. 

Implementations of Turing are avail- 
able for IBM PC compatibles, 
Sun/68000 workstations, UNIX/VAX 
minicomputers, and IBM mainframes 
from HSA, Inc., 203 College St., Ste. 
305, Toronto, Ont., Canada, MST 1P9, 
(416) 978-6985. | 


R.C. Holt, Ph.D., is a professor in the 
Computer Systems Research Institute at 
the University of Toronto, Ont., Canada. 
He has been a member of the design and 
implementation teams for PL/C, the 
SUE system language, SPk, and Con- 
current Euclid. His research on operat- 
ing systems includes the deadlock 
problem, development of a UNIX-com- 
patible system called TUNIS, and devel- 
opment of the Turing system. 


UNIX is a registered trademark of AT&T Bell 
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mance 
ysis is wrong, 


For starters, you probably think of 
software performance analysis 
tools as some sort of software 
package. 

Wrong. The NWIS Software 
Analysis Workstation (SAW) 
uses sophisticated hardware to 
sample your software. There's 
no intrusion into your mem- 
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ory space or CPU cycle steal- = Tots — = EES 


ing. The SAW operates in 
real-time and non-statisti- 
cally. You captureevery = 
occurrence of the events — 
specified, not just a random sample. 

You might also think performance analysis is limited to very 
narrow windows of real-time execution. 

Wrong again. With the SAW, you can now analyze days of 
execution in a single run, instead of just a millisecond or two. 
With total accuracy. . 

You also might associate performance analysis with assem- 
bly code. Even though the majority of your code is probably 


compiled from high-level source. 


first tool which lets you work 
directly with high-level source 
code definitions, such as proce- 
dures, modules and global 
variables. 

Finally, you might imagine 
performance analysis to be a 

; 44 stand-alone tool. But the SAW 

Ty changes that for good. In the 
very same system, you get 
high-level symbolic trace, 
assembly-level trace, time- 
erm alioned multi-processor 
trace and code coverage analysis. All these tools are compiler/ 
assembler and host development computer independent. 

In short, the SAW is everything you hoped software per- 
formance analysis could be, but wasn’t. Let us connect the SAW 
to your target system and you'll see 
why. For an on-site demo and free 
applications library, phone: 
1-800-547-4445 
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ow did two lib- 
eral arts majors 
from Ohio, who 


swore off computers after their first 
encounter with them, end up in Silicon 
Valley running what many people consid- 
er the best bookstore for professional pro- 
grammers, engineers, and software 
developers? 

“We're obsessive,” says Rachel Un- 
kefer, one of the co-owners of Computer 
Literacy Bookshop (described by The 
Whole Earth Software Review as “a 
civilized haven in a savage landscape”). 
“We want to have the most complete se- 
lection anywhere. We just want to be the 
best.” 

Their original goal, says Dan Doern- 
berg, Unkefer’s partner in the venture, 
was to have a retail store that was 
staffed with people knowledgeable about 
computers and the books that explain 
how they work. 

“We're really here for the techies,” 
says Doernberg. “If someone has a prob- 
lem, we’re here to have exactly what they 
need. Our regular customers know that if 
a book exists, we’re probably going to 
have it, or at least know about. That’s 
what our job is.” 

“Most of what has happened to the 
store has been because our customers 
have forced us to do it,” says Unkefer. In 


The making of a computer bookstore 
TT TF SE 


By Kathy Kincade 


response to customer requests, Computer 
Literacy’s hours have been expanded 
(they’re now 9 a.m.-9 p.m. Monday-Fri- 
day and 10 a.m.-6 p.m. Saturday-Sunday 
at the San Jose and Sunnyvale stores). 
Also, two new locations were added when 
the first store (in Sunnyvale) became too 
crowded. 

“The customers really drive the thing,” 
Unkefer continues. “We’re not a multi- 
national conglomerate with a massive 
strategic planning department that sits 
there and dreams up all these changes. 
We’ll consider any customer suggestion 
that sounds reasonable. That’s how we’ve 
grown the way we have.” 

But why computers? After their first 
unpleasant experience (a very math- 
oriented PL/I course at Duke University, 
Durham, N.C., that involved such things 
as multiplying matrices and plotting tra- 
jectories for physics problems), you’d 
think they’d keep a wide berth. And that 
was their intention. 

“Then we moved to California [Santa 
Barbara],” says Doernberg. “I discovered 
micros and word processing and I was 
hooked. Rachel resisted for about a year, 
but then I finally dragged her into it 
too.” 

“Dan was hacking on a BASIC pro- 
gram where he worked,” says Unkefer, 
“and then I started getting into it. We'd 
go there in the middle of the night and 
work on the program.” 

“It was one of those classic situations 
where I wasn’t supposed to be on the ma- 
chine other than to do my job and Ra- 
chel wasn’t supposed to be there at all,” 
continues Dan. “It took us months. Any 
programmer who looked at the code now 
would be absolutely appalled, but it was 
the first program we'd ever written that 
we cared about.” 

“And it worked,” Unkefer adds, 
smiling. 

Being book people “from way back,” 
Doernberg then proceeded to scour the 
libraries, bookstores, and computer out- 
lets of Santa Barbara in search of every 
computer book he could get his hands on. 

“T just wanted to know how computers 
worked,” he says. “But there were no up- 
to-date computer books. I went to the li- 
brary and they had John Diebold’s 
Computer Report of 1964, which talked 
about the banking industry and how ev- 


Rachel Unkefer and Dan Doernberg, 
Computer Literacy's cofounders 


erything was going to be revolutionized 
by computers. All I wanted to know was 
how an Apple II worked.” 

He was just as frustrated by the book- 
stores and computer outlets. “If I went 
into a computer store looking for a book, 
they’d try to sell me a machine,” Doern- 
berg says. “If I went into a bookstore, the 
clerks didn’t know what I was talking 
about. I decided what I really wanted to 
do was open a bookstore for people who 
wanted to find out about computers.” 


rom the first day 
Doernberg and 
Unkefer opened 


Computer Literacy’s doors (March 
1983), customer service has been the pri- 
mary consideration. Today, over four 
years later, it is still the driving force be- 
hind the store. 

“T like to think we play some role in 
expediting projects or making people a 
little more informed by having all this 
information available and being able to 
access it for them,” says Unkefer. “We 
can help that new software package be a 
little better because we helped the de- 
signer find a better algorithm, which ul- 
timately benefits everyone who uses the 
package. That’s one of the neat things we 
have that most bookstores don’t.” 

Some of the unique services offered by 
Computer Literacy are a mail-order ser- 
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vice to locations all over the world, an in- 
teractive bulletin board, and a bimonthly 
newsletter. 

The mail-order business grew out of 
customer necessity. “In a small town, 
you’re not going to have access to the 
kind of material we have here,” says 
Doernberg. “And to order it from the 
publisher, you’re going to wait 8-10 
weeks. People started coming in saying 
they didn’t have this sort of selection 
back home, and we would tell them ‘any 
time you can’t find something back 
home, give us a call, we ship within 24 
hours.’ If somebody wants something 
fast, we'll Federal Express it and they 
can have it the next day.” 

The bulletin board, a tree-structured 
conferencing system run by the staff of 
the Sunnyvale store, began as a way for 
people to leave book requests after hours. 
Over time it has expanded into a forum 
for users to exchange opinions about 
books, languages, etc. 

“It’s more an interactive forum for 
ideas than a data base,” says Unkefer. 
“On some conferences, we’ll have people 
arguing about which book is the best 
book on C.” 

In addition, interviews with authors 
have begun to be put on the bulletin 
board. Anyone who logs on to the BBS 
can then leave questions for the author, 
who will dial in and leave answers to 
their questions. (To contact the Com- 
puter Literacy BBS, call (408) 730-9959, 
9:30 p.m.-8:30 a.m., Monday-Friday, ae 
all day Saturday and Sunday.) 

Each issue of the store’s newsletter is 
also available on the bulletin board. The 
newsletter is free, and they'll mail it any- 
where in the world. (To get on the mail- 
ing list, call or write to Computer 
Literacy and give them your name and 
address.) It contains short book reviews 
of 50-60 of the latest releases—from ma- 
jor publishers down to one-guy-in-a-ga- 
rage authors. 

“When a book comes in, we'll take a 
look at it and then check it out with 
some of our customers to see what they 
think,” explains Doernberg. The result is 
an honest review of the book—whether 
it’s good or bad—by consensus rather 


than the rewriting of a press release. 


ith over 14,000 
titles in their 
data base and 


about 60,000 books in stock (all sold at 
list price), Doernberg and Unkefer ap- 
pear to have little competition to the title 
of most comprehensive computer book- 
store. And finding the books is not al- 
ways an easy task. 

Although mainstream publishers send 
them catalogues, says Unkefer, “We also 
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have a research person on our staff who 
goes through all the magazines and jour- 
nals and digs up as much obscure mate- 
rial as she can find. That’s pretty much 
her goal: to keep finding titles nobody 
else has.” 

Having someone dedicated almost full 
time to this task is a real luxury for a 
bookstore, says Doernberg. This luxury 
allows Computer Literacy to come in 
contact with even the smallest of publish- 
ers—people who won’t usually contact 
bookstores because they think their ma- 
terial is too technical for general release. 
Doernberg and Unkefer persuade them 
that Computer Literacy is an exception. 

“They’re not people from the book in- 
dustry,” says Unkefer. “They’re just peo- 
ple who have good information. For 
example, we had some guy who wrote a 
book about Hewlett-Packard calculators, 
and I’m sure we were about the only 
bookstore in the country who knew he 
was there.” 

Customers also are a driving force in 
helping Computer Literacy find many of 
the books the store acquires and carries. 

“Someone will come in with an ob- 
scure request, and we'll go to the trouble 
to track it down,” says Unkefer. “We 
find that these requests tend to be repre- 
sentative of more than one person.” This 
sort of service is nice for customers, adds 
Unkefer, “because they know if we don’t 
have something in stock, we’ll get it.” 

But it’s not just the size of their inven- 
tory or the amount of information avail- 
able that makes Computer Literacy a 
valuable resource. Equally important is 
the manner in which that information 
has been organized. 

A committee of five people put togeth- 
er by Doernberg and Unkefer spent sev- 
eral months hashing out philosophical 
arguments about what belonged in each 
category, says Unkefer. “It was like 
drafting the constitution. We finally end- 
ed up with about 100 categories and 560 
subcategories. 

“Everything is subcategorized for ease 
and convenience. It’s a very good user in- 
terface,” she adds, smiling. 

The category “Languages,” for exam- 
ple, has 35 subcategories, each broken 
down into the standard language and 
then several dialects (if there are any). 

_ For instance, under BASIC youll find 
the BASIC programming language, 
CBASIC, MBASIC (Microsoft BASIC), 
QBASIC (Quick BASIC), and TRUE 
(the TRUE BASIC dialect). Among the 
more “exotic” languages on the list are 
DIANA (an Ada dialect), PL/C (an 
APL dialect), and PEARL. 


nother feature at 
Computer Liter- 
acy is the Tech- 


nical Community speaker series. These 
events, which are free, are a result of 
Doernberg and Unkefer’s belief that the 
Valley should have some sort of cultural 
center where people interested in com- 
puters could hang out and exchange 
ideas. 

“When we moved here to start the 
store,” says Doernberg, “I had a roman- 
tic idea that oh, gosh, I was going to live 
in Silicon Valley and I’d go out shopping 
and run into Adam Osborne and meet 
David Packard at the meat counter at 
Safeway. At the least, I thought there’d 
be a place where people would be getting 
together and learning about computers 
and there’d be this intellectual exchange. 

“And then we got here, and there was 
nothing that in the ’60s would have been 
called a cultural center. A place where 
speakers would appear daily and you 
could go for free and listen to someone 
and ask questions. We felt this sort of 
thing went hand-in-glove with the 
bookstore.” 

In fact, the first store had 25%-30% of 
unused space set aside purely for the 
speaker sessions. 

“We had stacks of plastic vinyl chairs 
around the store,” recalls Doernberg, 
“and when a speaker was coming, we’d 


take all the books off the bookcases, 
move them out of the way, and unload 
the stacked chairs. We had chairs for 30 
people and standing room for 20 more. 
When the speaker was done, we’d stack 
the chairs up, move the bookcases back 
over, and load the books back on the 
bookcases. That went on for about a 
year.” ‘ 

At the same time, the store’s inventory 
was growing at such a rapid pace that 
new bookshelves had to be built, cutting 
into the room for speakers. Finally the 
series had to be discontinued until the 
new stores were added and space opened 
up. 
Because of Computer Literacy’s al- 
most underground reputation in the com- 
puter community, getting speakers is 
about the easiest part of the job. “A lot 
of them have heard of the store already,” 
says Doernberg. “I called Dennis Ritchie 
to try and get him to speak. He said 
‘well, I only get out there a few times a 
year, but I’ve stopped by your store a 
couple of times. You guys have a really 
good reputation at Bell Labs.’ He knew 
who we were! 

“And I said, ‘well, I’m sure you didn’t 
pay for anything with a credit card be- 
cause if anyone at our store took a credit 


FULL AT&T C++ for half the price of our competitors! 


Guidelines announces its port of version 1.1 of AT&T’s C++ translator, As an 


object-oriented language, C++ includes: 
constructors and destructors, data hiding. and data abstraction. 
means that C++ code is more readable, more reliable and more reusable. 


classes, inheritance, member functions, 
‘Object-oriented’ 
And that 


means faster development, easier maintenance, and the ability to handle more 


complex projects. 


C++ is Bell Labs’ answer to Ada and Modula 2. C++ will 


more than pay for itself in saved development time on your next project. 


C++ 


from GUIDELINES for the IBM PC: $195 


Requires IBM PC/XT/AT or compatible with 640K and a hard disk. 
Note: C++ is a translator, and requires the use of Microsoft C 3.0 or later. 


Here is what you get for $195: 
e The full AT&T vl.1 C++ translator. 


e Libraries for stream I/O and complex math. 

° "The C++ Programming Language", the 
definitive 327-page tutorial and description 
by Bjarne Stroustrup, designer of C++. 


¢ Sample programs written in C++. 
e Installation guide and documentation. 
e 30 day money back guarantee. 


To order: 
send check or money order to: 


GUIDELINES SOFTWARE 
P.O. Box 749 
Orinda, CA 94563, 


To order with Visa or MC, 
phone (415) 254-9393. 
(CA residents add 6% tax.) 


C++ is ported to the PC by Guidelines under license from AT&T. 
Call or write for a free C++ information package. 
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around,” remembers Doernberg. “He 
was there for an hour after the other 
speakers and most of the crowd had left. 
Even the staff was trying to inch its way 
out at that point.” 

Other speakers in 1987 have included 
Andy Tanenbaum, Edsger Dijkstra, Ed 
Feigenbaum, Nils Nillson, Gene Am- 
dahl, and Donald Knuth. 

“Knuth was great,” says Unkefer. “He 
told us he wasn’t going to have a pre- 
pared talk, that he was just going to get 
up there and answer any question the au- 
dience asked. But he ended up telling a 
bunch of stories before he took any ques- 


card from Dennis Ritchie, the whole 
place would be abuzz for about two 
weeks.” 

Eventually, Ritchie did speak. “The 
question-and-answer session with him 
was really hot,” says Doernberg. 

Interaction between the speakers and 
the audience is “absolutely required,” 
says Doernberg. After the initial presen- 
tation and question-and-answer period, 
the audience breaks up into groups so 
people can talk to the speakers one-on- 
one. 

“On Mac night, Andy Hertzfeld had a 
group of people following him all 


Now COBOL Programmers Can Do Formatted 
Screens Quickly and Easily - with SCREENIO. 


SCREENIO is the Screen Manager for Realia™ COBOL. 


SCREENIO is a high-performance, COBOL specific screen manager for the Personal Computer and compatibles. It’s power- 
ful, offers an impressive array of features, yet is easy to use. SCREENIO was written by experienced COBOL professionals 
and represents a truly COBOL approach to screen management on the PC. 


Design and Revise Screens Painlessly With Our Panel Editor. 


Use our interactive Panel Editor Facility to design your screens with a What-You-See-Is'\What-You-Get approach. You can 
easily modify and experiment with screen layouts. Type titles and descriptive information on the screen, draw lines and 
boxes using the cursor movement keys, and paint the colors you want using the cursor keys or block functions. Use all 
256 color combinations on your screens. 


Define your data fields in COBOL terms; use your own data name, PICTURE and VALUE clauses. Specify the field type 
(various alpha and numeric types, hex, etc.), valid entries for the field (if you want SCREENIO to edit your data for you), 
and various other items. The Panel Editor will produce-a copybook that contains this information. Panel revisions rarely 
mean changing your source code. 


Programming for SCREENIO is Easy. 


You can display your screen and accept data with as few as two statements; a COPY panelname in your WORKING-STORAGE 
SECTION, and a CALL SCREENIO statement in the PROCEDURE DIVISION. SCREENIO is linked with your applica- 
tion just as any other COBOL subroutine would be. 


SCREENIO takes care of tabbing, data validation, and other functions expected of a good screen manager. When we return 
to your COBOL program, the data from the user fields on the screen is in your variables. 


Yes, we've always done windows. SCREENIO supports Edit Masks, Automatic Error Detection and Editing, High Speed 
Video, Hot-Fields, Key Redefinition, Foreign Language Capability, Custom Tabbing Order, Color Control at Runtime, PC 
Speaker Control, and much, much more. A BMS Mapset Import is available. Most programmers are amazed at how easy 


it is to build flashy applications using SCREENIO and COBOL. 


Our Support is Outstanding. 


We provide superb telephone support. Upgrades are distributed to licensed users automatically for the first year. There are 
no Runtime Fees - the code you develop is yours to distribute freely. 


Me 


Call us to discuss your application. Get a feel for the kind of quality support we provide. 


We'll Send You a Free Demonstration Diskette. 


This limited version of our Panel Editor shows how you design panels. Because it’s written with COBOL and SCREENIO 
it also shows the kind of features and performance you can expect in your applications. 


SCREENIO 2.1 is only $400 plus shipping. Save $100 - order SCREENIO and Realia COBOL from 
us. We also offer packages with Kedit, a great programming editor. Ask about our other 
programming tools, too. 


Not satisfied with FORMS? Ask about SCREENIO for Micro Focus"*COBOL. 


In a hurry? Most orders are delivered within 24 hours! 


- Amex MC Visa Check - 


Nerthern Computing Consultants 
RO. Box 020897 e Juneau, Alaska 9980: 
(907) 780-6464 ¢ TELEX 510 601 4951 (Norcom 
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tions. It was all anecdotal, very interest- 
ing, and funny. People really enjoyed it.” 

“People asked him about algorithms, 
The TEXbook, his favorite baseball 
team...” recalls Doernberg. “He said he 
thought he’d talk about an hour, and he 
was there 2'4-3 hours. There was a long 
receiving line of people who just wanted 
to meet him and have him sign old copies 
of his books they had brought with 
them.“ 

While the speaker nights are supposed 
to happen once a month, the schedule is 
pretty loose, says Doernberg. “Since we 
don’t charge for the events and no one 
organizes them, it tends to be a seat-of- 
the-pants thing.” 

Computer Literacy announces the 
speaker nights in its newsletter, through 
mailings and fliers posted around the 
stores, and on its BBS. Though the pro- 
cess may be a little haphazard, it is 
amazingly effective. 

“Ritchie and Tanenbaum were both 
scheduled on literally a week’s notice,” 
says Doernberg. “Normally with only 
one week you won’t get the word out and 
only about five people will show up. But 
we had 400 people for Tannenbaum and, 
about 500 for Ritchie, easily. We told 
customers about the speakers and they 
told people at work and put announce- 
ments on their internal BBSs.” 


hough Doernberg 
says he probably 
wouldn’t have 


gotten into the retail business if he had 
realized how many problems were in- 
volved, he and Unkefer definitely seem to 
be having a good time. A big reason for 
this is their good-natured approach to the 
details of the job, such as the store’s 
name—which was originally intended as 
a pun. 

“Literacy is about books, and the term 
‘computer literacy’ had been coined as 
‘learning about computers is analogous 
to learning how to read.’ We thought ‘lit- 
eracy for computers, books for your com- 
puter,” explains Unkefer. “I don’t know 
if anybody really got it.” 

“It’s a misnomer now,” says Doern- 
berg. “People think of computer literacy 
as an introduction to how to use comput- 
ers. In fact, our store is very oriented to 
professional programmers, software de- 
velopers, and electrical engineers. 

“T guess we should have called it 
‘Computer Bookstore,” he adds. 

The diverse clientele that makes it 
way through the doors of Computer Lit- 
eracy each day also keeps their spirits 
up. “They run the whole gamut, from 
professionals to academics to students,” 
says Unkefer. 

“We even have busloads of Japanese 
tourists that come by,” adds Doernberg, 


laughing. “One of the tour buses stops 
here. The tourists come in and buy T- 
shirts, posters of Silicon Valley, three-vol- 
ume sets of Don Knuth, whatever.” 

“A lot of people come from other parts 
of the country,” Unkefer continues. 
“They’re out here on company training 
and have the store recommended to 
them. Then they start coming in every 
time they come back to the Valley.” 

“They’re hooked for life,” laughs 
Doernberg. 

Of all the purchases these people 
make, one has to wonder what book sells 
the most. 

“Historically, The C Programming 
Language by Brian Kernighan and Den- 
nis Ritchie has been the best-selling com- 
puter book of all time. In the history of 
our store, it’s been the most popular. And 
it’s pretty definite that there’s going to 
be a new edition,” says Doernberg. 

Judging by book sales, C appears to be 
the most popular language these days, 
say Doernberg and Unkefer. Books on 
assembler, PROLOG, and LISP also sell 
well. Turbo Pascal still seems to be pret- 
ty popular, says Doernberg, “but not the 
way it was at first.” 


oernberg feels 
Computer Liter- 
acy offers its 


customers something even more impor- 
tant than all these services: the chance to 
gain knowledge about subjects they 
didn’t even know existed. 

“By having this kind of information 
available, people come in and are 
amazed that there are even books out on 
some topic—a topic they never thought 
to be interested in or thought there 
would be any information on,” he says. 

Computer Literacy also has in its 
stacks the information needed to educate 
people about computers at all levels— 
though Unkefer isn’t sure how necessary 
this sort of training will be in the future. 

“Everybody (programmers, developers, 
etc.) is heading toward better user inter- 
faces, where the computer is like a car— 
you just turn a key and it goes,” she says. 
“If things continue this way, you 
shouldn’t have to know anything about 
computers.” 

Doernberg disagrees. “Computers are 
getting more and more pervasive—in mi- 
crowaves, educational simulation, all 
sorts of things. And it’s going to become 
really important for people to have an 
idea of how they work and why they run. 

“I’m not talking bits and bytes here,” 
he expands. “I just mean everyone should 
have a basic understanding. It’s impor- 
tant that people have that familiarity. No 
one’s afraid of the phone. But you don’t 


have to worry about how it works—you 
just know it works. And that’s fine for 
about 99% of the people. 

“But even as computers become easier 
to use and understand,” he continues, 
“there will always be that 1%-2% of the 
people who want to create and design 
their own tools. There will always be pro- 
grammers, I’m sure.” 

And with any luck, there will always 
be stores like Computer Literacy, run by 
people like Dan Doernberg and Rachel 
Unkefer, to meet the needs of those 
programmers. [Fy 


520 Lawrence Expressway 
Sunnyvale, Calif. 94086 
(408) 730-9955 


South Bay Center 
2590 N. First St. 

(at Trimble Rd.) 
San Jose, Calif. 95131 
(408) 435-1118 


Techmart 

5201 Great America Parkway 
(at Bunker Hill Dr.) 

Santa Clara, Calif. 95054 

(408) 562-5799 


You can find Computer Literacy Book- 
shops at the following locations: 


Kathy Kincade is Managing Editor of 
COMPUTER LANGUAGE. 


WHY DG'SEVEN OF THE “BIG EIGHT” 
ACCOUNTING FIRMS CHOOSE REALIA COBOL? 


Why Realia? Simple. Because we can help the best stay the best. 


Realia COBOL is the fastest, most advanced application development tool 
available to bring the power of the mainframe right to your PC. 

You'll start saving time, money, and resources, whether you're maintaining 
an old system or creating a new one. 

Realia COBOL offers the quickest compilation and the biggest file 
capacity of any PC compiler. 10,000 lines compile in 76 seconds. 10,000 
records sort in 43 seconds. Best of all, Realia-compiled programs execute 
faster than any other PC compiler's. With RealCICS®, you can even handle 
online CICS programs. 

At Realia, we also offer you something that has become a bit of a 
contradiction in terms: genuine support for a micro software product. ° 


Realia COBOL—simply the best choice. 


REALIA 


10 South Riverside Plaza, Chicago, IL 60606 + (312) 346-0642 « Telex 332979 
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RECENT DISCOVERY 


Hoops Graphics Library by Flying 
Moose. Object-oriented 2 & 3 D, hidden 
line, perspective, rendering, rotate. 

Call from C, Pascal, or FORTRAN. 
Device independence, hierarchical 
graphics database. PC $ 895 


Al-Expert System Dev’t 


Arity Combination Package PC $ 979 
System - use with C MS $ 229 
SQL Dev’t Package MS $ 229 

Auto-Intelligence PC $ 739 

CxPERT - shell for C MS $ 295 

Exsys PC $ 309 
Runtime System PC $ 469 

Insight | MS $ 75 

Insight 2+ MS $ 379 

Intelligence/Compiler BGrS 739 

Mle R@iEasy, PC $ 435 


Personal Consultant Plus PC $2589 
Personal Consultant Runtime PC $ 85 
Turbo Expert-Startup(400 rules) PC $ 129 

Corporate (4000 rules) PC $ 359 


Al-Lisp 


Microsoft MuLisp 85 


PC Scheme LISP - by TI PC $ 85 
Star Sapphire MS $ 459 
TransLISP - lIcarn fast MS $ 79 
TransLISP PLUS 

Optional Unlimited Runtime $ 139 
PLUS for MSDOS $ 169 
Others: IQ LISP ($155), IQC LISP ($269) 


Al Prolog 


APT - Active Prolog Tutor - build 
applications interactively PE 
ARITY Prolog - Interpreter RE 
COMPILER/Interpreter-EXE PC 
Standard Prolog MS 
MicroProlog - Prof. Entry Lev. MS 


MicroProlog Prof. Comp./Inter. MS $ 439 
MPROLOG P550 BGS: lis 
Prolog-86 - Learn Fast MS 89 
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Prolog-86 Plus - Develop MS 
TURBO PROLOG by Borland PC $ 69 
Turbo Prolog Toolbox PC $ 69 


Basic 


BAS_C - economy MS $ 179 
BAS_PAS - economy MS $ 135 
Basic Development System RE $.105 
Basic Development Tools BGS; 89 
BetterBASIC PC $ 129 
Exim Toolkit - full PC $ 45 
Finally - by Komputerwerks PC $ 85 
Mach 2 by MicroHelp PCRS 55 
QBase - by Crescent Software MS $ 89 
QuickBASIC PC $ 69 
Quick Pak-by Crescent Software PC $ 59 


Turbo BASIC - by Borland PC $ 69 


FEATURES 


TP2C - Translate Turbo Pascal to 
formatted K & RC (proposed ANSI 85 
standard). Include files, in-line 
code, nested procedures, 95+ % 
successful conversion PG $ 29 


C Worthy Interface Library - Complete, 
tested human interface or MS C, Lattice 
or Turbo C. Full screens, Windows, 
DOS, Error Handling, Menus, Messages. 
Source separate, no royalties. PC $ 249 


THE PROGRAMMERS SHOP 


helps save time, money and cut frustrations. Compare, evaluate, and find products. 


Free Literature 
Compare Products 


Evaluate products. Conmpare competitors. Learn about new 
alternatives. One free call brings information on just about 
any programming need. Ask for any “Packet” or Addon 
Packet © AIE ADA, Modula © BASIC E “C” CE COBOL E 
Editors © FORTH © FORTRANE PASCAL E UNIX/PC or 
© Debuggers, Linkers. 


Our Services: 
+ Programmer’s Referral List + Dealers Inquire 
+ Compare Products » Newsletter 
+ Help find a Publisher + Rush Order 
+ Evaluation Literature FREE + Over 700 products 
+ BBS-7 PM to7 AM 617-740-2611 + National Accounts Center 


Cobol I/Q - query, report, graphs PC $ 395 
Microfocus Professional Cobol PC $1599 
VS Workbench PC $3379 


Microsoft COBOL MS $ 439 
Microsoft Cobol Tools PC $ 209 
Personal COBOL PE $: 129 
Realia - very fast MS $ 819 


Ryan McFarland COBOL MS Call 
COBOL-85 MS _ Call 
Screenplay - screen mgmt. PC_S' 129 


C Libraries-Communications 


Asynch by Blaise RE $125 
Essential Comm Library PC $. 125 
With Breakout Debugger PC $ 189 
Greenleaf Comm Library PC $ 129 


Multi-Comm - add multitasking PC $ 135 


dBASE Language 


Clipper compiler RE ~ Call 
dBASE II MS $ 329 
dBase III Plus PC $ 429 
dBASE III LANPack PC $ 649 
DBXL Interpreter BESS. 189 
FoxBASE+ - single user MS $ 349 
QuickSilver by Word Tech PC $ 499 


dBASE Support 


dBase Tools for C PC $ 65 
dBrief with Brief-> RGs Gall 
dBC ISAM by Lattice MS Call 
dFlow - flowchart, xref MS Call 


Documentor - dFlow superset MS Call 
Genifer by Bytel-code generator MS $ 299 
QuickCode III Plus MS $ 239 
Tom Rettig’s Library PC $ 89 
UI Programmer-user interfaces PC $ 249 


Editors for Programming 


BRIEF Programmer's Editor PC Call 
EMACS by UniPress Source: $895 $ 265 


Epsilon - like EMACS PC $ 149 
KEDIT - like XEDIT PE 99 
ME Macro Editor - Source PE 719 
Micro Focus Micro/SPF RE 139 
PC/EDT - macros PC §$ 229 
PC/VI - by Custom Software MS $ 109 


Personal REXX PC 
PMATE - power, multitask PC § 


AAAMAADAHHAWMH 
Ne} 
Ne} 


SPF/PC - fast, virtual memory PC 189 
Vedit MS 99 
Vedit PLUS MS $ 129 


RECENT DISCOVERY 


RTC PLUS by Cobalt Blue. Translate 
FORTRAN 77 and RATFOR to C except 
F77 1/0, FORTRAN character, and 
complex expressions. Some DEC F77 
extensions. Library C Source. MS $ 279 


C Language-Compilers 


AZTEC C86 - Commercial PC $ 499 
C86 PLUS - by Cl MS $ 359 
Datalight C - fast compile, good code, 

4 models, Lattice compatible, 


Lib source. Dev’rs Kit Pe S77 
Datalight Optimum-C MS $ 99 
with Light Tools by Blaise PC $168 
Lattice C - from Lattice MS $269 
Let’s C Combo Pack PC $ 99 


Eetisie RES Sy 
Microsoft C 4.0- Codeview 
Rex - C/86 - standalone ROM MS $695 


Turbo C by Borland PC $ 69 
Uniware 68000/10/20 Cross 
Compiler by SDS MS Call 


C Language-interpreters 


C-terp by Gimpel - full K & R MS $219 
C Trainer - by Catalytix PC $ 89 
INSTANT C - Source debug, 


Run/C Professional MS $155 

Run/C Lite MS $ 79 
C Libraries-General 

Blackstar C Function Library PC $ 79 

C Essentials - 200 functions PC $ 75 


C Tools Plus (1 & 2) - Blaise PC $119 

C Utilities by Essential-Comprehensive 
screen graphics, strings, source. PC $119 

Entelekon C Function Library PC $119 


Entelekon Superfonts for C P5545 
Greenleaf Functions portable. PC $139 
LIGHT TOOLS by Blaise PC $ 69 


C Libraries-Files 


C Index by Trio MS $ 89 
/File is object only MS $ 89 
/Plus is full source MS $319 

BTree by Soft Focus MS $ 69 


CBTREE- Source, noroyalties MS $ 99 
ctree by Faircom - no royalties MS $315 
ctree w/ rtree 
rtree - report generation PC $239 
dbQUERY - ad Loc, SQL - based MS $129 
dbVISTA - full indexing, plus optional 
record types, pointers, Network. 

Object only - MS C, LAT, C86 $129 


Source - Single user MS $389 
Source - Multiuser MS $699 
dBx - translator MS $299 
w/source to library MS $429 


FEATURE 


C + + by Abraxas - preprocessor 
generates MS C source. Classes include 
File I/O, Screen, Keyboard, Moust, 
Printer, DOS, BIOS, Memory 
management, Communications, 


Realtime, Source PC $269 


provides complete information, advice, guarantees and every product for Microcomputer Programming. 


THE PROGRAMMERS SHOP 


*PASCAL & MODULA PROGRAMMERS:* 


Special Prices off Recommended Tools. 


Choose the right combination for you. Logitech's 
Modula environments are tailored for beginners 


or experts. Support products speed development 
efforts. 

Pascal Tools | gives you BIOS access & string 
handling: Tools 2 supplies DOS interface for 
“generically-compatibles™ plus graphics. Get both 
for complete control! 


C Support-Systems 


Advantage C+ + PC $479 
C Sharp - realtime, tasks. PC $495 
CToolSet - DIFF, xref, source MS $ 89 
The HAMMER by OES Systems PC $129 
Lattice Text Utilities MS $ 89 
Multi-C - multitasking PC -$i135 
PC LINT-Checker. Amiga $89 MS $ 99 
Pfantasy Pac - by Phoenix PC $619 
PforCe + + PC $239 
Pre-C - Lint-Like MS $155 
Quickshell - script compiler PC $349 
Sapiens V8 - 8M workspace PC $269 
SECURITY LIB- Source $229 PC $115 
Timeslicer PC $265 

with library source PC $895 


C-Screens, Windows, Graphics 


C Power Windows by Entelekon PC $109 


C Scape Il- witheditor,source PC $379 
Curses by Aspen Scientific PC $109 
Curses by Lattice PC $ 89 
dBASE Graphics for C PC $ 69 


ESSENTIAL GRAPHICS - fast PC $185 


GraphiC - new color version PC $285 
Greenleaf ‘Data Windows PC $159 
w/source PC $289 


LightWINDOWS/C-for Datalight C PC $ 79 


Screen Ace Form Master PC $195 
Vitamin C - screen I/O PC $159 
Windows for C - fast PC $189 


Windows for Data - validation PC $319 


View Manager - by Blaise PC $179 
ZView - screen generator MS $139 
Debuggers 
386 Debug - by Phar Lap PC $129 
Breakout - by Essential PE $ 89 
CODESMITH - visual PE@rS99) 
C SPRITE - data structures PC $119 
Periscope I PC $289 
Periscope II PE= $139 
Periscope II-X PC. $105 
Periscope III-64K RAM, switch PC $825 
Pfix-86 Plus - by Phoenix PC $229 
Turbo TDebug PEG S55 


SoftProbe II -embedded systems PC $695 


RECENT DISCOVERY 

BACK-IT by Gazelle Systems - 
Flexible backup allows file inclusion/ 
exclusion, incremental backup, by date 
range, modified only. Auto format,. : 
data verification, help. PC $119 


HOURS 


8:30 AM - 8:00 PM EST. 


Call before September 30, 1987 and mention 
this ad for these SPECIAL PRICES: 
List Normal SPECIAL 


Modula 2/86 
Apprentice Package $99 
Wizard Package $199 
Window Package $ 49 
Magic Toolkit $ 99 

Blaise Pascal Tools | $125 
Pascal Tools 2 $100 
Pascal Tools Combo ——- $175 


Fortran & Supporting 


50:More FORTRAN PC $ 95 
Forlib+ by Alpha MS $ 59 
I/O Pro - screen development PC $129 
MACFortran by Microsoft MAC $229 
MS Fortran - 4.0, full 77° MS $279 
No Limit - Fortran Scientific PC $109 
PC-Fortran Tools - xref, pprint PC $165 
RM/Fortran MS 
Scientific Subroutines - Matrix MS $129 


“Multilanguage Support 


$ 69 
$149 
$ 39 
$ 69 
$ 89 
$ 75 


BTRIEVE ISAM MS $185 
BTRIEVE/N-multiuser MS $455 
Flash-Up Windows PGS J9, 
GSS Graphics Dev’t Toolkit PC $375 
HALO Graphics PC $209 

Development Package MS $389 


Informix 4GL-application builder PC $789 
Informix SQL - ANSI standard PC $639 
NET-TOOLS - NET-BIOS PC $129 
Opt Tech Sort - sort, merge MS $ 99 


PANEL MS $215 
Pfinish - by Phoenix MS $229 
PolyBoost - speed I/O, keyboard PC $ 69 
Polylibrarian by Polytron MS $ 79 


Prime Factor FFT - 8087/287 PC $145 
PVCS Corporate-source control MS $309 


PVCS Personal MS $109 
QMake by Quilt Co. MS $ 79 
Report Option - for Xtrieve MS $109 
Screen Machine PC $ 59 
Screen Sculptor PEeS795 
SRMS - new version MS $159 


SSP/PC - 145+ math routines PC $269 
Synergy - create user interfaces MS $375 
Xtrieve - organize database MS $199 
ZAP Communications- VT 100 PC $ 89 


Pascal and Supporting 


ALICE - learn Pascal PC $ 49 
Exec - Chain Programs MS $ 79 
MetaWINDOWS-graphics toolkit 

bit-mapped, fast PC $159 
MetaWINDOWS PLUS PC $229 
Microsoft PASCAL - faster MS $189 
Pascal Pac with Tidy PC $ 49 


Pascal 2 - by Oregon Software MS $329 
Turbo Extender by Turbo Power PC $ 65 
TurboHALO - 150 routines BE S199 


_DataBase & File Management 


DataFlex by Data Access PC $ 899 
Dataflex multiuser PC $1149 
VP-Info - dBASE-like BES 


800-421-8006 


THE PROGRAMMER’S SHOP ™ 
Your complete source for software. services and answers 
5-L Pond Park Road, Hingham, MA 02043 

Mass: 800-442-8070 or 617-740-2510 7/87 
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RECENT DISCOVERY 


dB2C Toolkit V 2.0 by Software 
Connection. 220+ dBIII functions in 
C source, file handler, windowing, 
interface to dB__VISTA, c-tree, 
dBC III, MS, Lattice, Instant C. 
No Royalties 


Other Languages 


APL*PLUS/PC PC $ 429 
CCS Mumps - Multiuser PC $ 359 
Microsoft MASM MS $ 98 


Modula-2 Wizards Package PC $ 179 
Pasm - by Phoenix MS $ 109 
PC Forth+ - by Lab Micro PC $ 199 


Smalltalk/V MS $ 85 
SNOBOL4 + - great forstrings MS $ 80 
UR/Forth MS $ 279 


Basic - by Microsoft $ 209 
C-Terp by Gimpel Software $ 379 
Cobol - by Microsoft $ 609 
Cobol Tools - by Microsoft $ 319 
Fortran or Pascal - by Microsoft $ 419 
Foxbase + $ 689 


MicroFocus Lev. II] Compact COBOL$ 795 


Panel $535 
Real-Tools $ 89 
RM/Cobol or RM/Fortran Call 
Xenix Complete System $ 999 
Xenix Development System $ 499 


Other Products 


386 Assembler/Linker PC $ 389 
Advantage Link PC $ 359 


ASMLIB - 170+ routines PG Sl 


asmTREE - B + tree filemgmt. PC $ 339 ~~~ 


Dan Bricklin’s Demo Program PC 
Disk Technician - smart disk 
upkeep PC 
Help/Control - on line help PC 
Interactive Easyflow-HavenTree PC 
Link & Locate - Intel tools © MS 
LMK - like UNIX make MS 
Microsoft Windows PE 
Software Development Kit PC 


MKS Toolkit - Unix, vi, awk PC 
Norton Commander PE 
Numerical Analyst by Magus PC 
PDisk - cache, tree Re 
PLink - 86 PLUS - overlays MS 
Polymake by Polytron MS $ 1 
PolyShell by Polytron MS $ 1 
PolyXREF by Polytron RE 
PMaker - by Phoenix RE 
Quelo 68000 X-ASM PC 
RPG II Compiler Pe 


Sapiens V8 - 8M virtual mgr. PC 


Source Print - by Aldebaran PC 
Taskview - ten tasks RE 
Tree Diagrammer PC 


Visible Computer: 8088 RE 
Xtree - classic graphic tree RE 
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Note: Mention this ad. Some prices are specials. Ask about COD 
and POs. Formats: 3” laptop now available, plus 200 others. UPS 
surface shipping add $3/item. All prices subject to change without 


notice. 


Call for a catalog, literature, advice and service youcantrust . 


“My time is what is most important to me. I no 
longer have to wade through stacks of ads and 
articles to find the right product; I just call you. 
The Programmer’s Shop has become an exten- 
sion of our PC evaluation department and we 
come to rely on you.” Carl Papendick 
RCA 


C CODE FOR THE PC 


source code, of course 
C Source Code 


PSEA (Scrbensmanagenliwe sac . a Ko we ere ae SpE Oe eperseds «eo a & $400 
Barcode Generator (specify Code 39 (alphanumeric), Interleaved 2 of 5 (numeric), or UPC) ... $300 
GraphiC 4.0 (high-resolution, DISSPLA-style scientific plots in color & hardcopy) ...... . $275 
Nita (NacWimdows) \. <5 sth @ eh we aie gm eG ee eB aaeeets © 4 weatipee tee SAO 
Essential C Utility Library (400 useful C functions) .............. ~ as + + $160 
Essential Communications Library (C functions for RS-232-based communication patents) . . $160 
Panache C Program Generator (screen-based database management programs) ......... $150 
PC/IP (CMU/MIT TCP/IP implementation for PCs)... 6. cece «se eee we $100 
B-Tree Library & ISAM Driver (file system utilities by Softfocus) .. ............. $100 
The. Profiler, (programvexeeution profile tool)... se kee gee te ee ee $100 
Entelekon C Function Library (screen, graphics, keyboard, string, printer, etc. Verges wanes st se . S100 
Entelekon Power Windows (menus, overlays, messages, alarms, file handling, etc.) . ... . se) $100 
QC88 C compiler (ASM output, small niodel, no longs, floats or bit fields, 80+ function | . . $90 
CBTree (B+tree ISAM driver, multiple variabledenath Keys)l sais cum! ¢ oo m-eetbes oom a dace $80 
ME (programmer’s editor with C-like macro language by Magma Software) ........... $75 
Wendin PCNX Operating System Shel .............2.. rae. fot meen, & $75 
Wendin PCVMS Operating System Shell. ..........2...2.2.2.224. ee ee oe $75 
Wendin Operating System*Construction Kit... ww sw ew ee $75 
EZ_ASM (assembly language macros bridging C and MASM).................4. $60 
Multi-User BBS (chat, mail, menus, sysop displays; uses Galacticomm iadem card Win wtih. eg ee $50 
Make (macros, all Ienence! uilbein leh, ak see Som. as ys gle Rt Glen aa re eset OOO 
Vector-to-Raster Conversion (stroke letters & Tektronix 4010 codes to bitmaps) ......... $50 
Coder’s Prolog (inference engine for use with C programs) .............-... oe BOGS 
PC/MPX (light-weight process manager; includes preemption and cooroutine packages) ..... . $45 
Biggerstaff’s System Tools (multi-tasking window manager kit)... .........-2.200- $40 
TELE Kernel (Ken Berry’s multi-tasking kernel) .............0.. afte eds he 50) 
TELE Windows (Ken Berry’s window package)... . 2... - ee eee ee eee See OOO 
Clisp (Lisp interpreter with extensive internals documentation) ............. i LS MS3O 
Translate Rules to C (YACC-like function generator for rule-based systems) ........... $30 
6-Pack of Editors (six public domain editors for use, study & hacking). ............. $30 
ICON (string and list processing language, Version 6 and update). .........2.2..44.. $25 
bp xs(lexical. analyser-getieravor) 9G" 2 hi e.g eal ee em cree ow elena nog Tis eee 
Bison & PREP (YACC workalike parser generator & attribute grammar preprocessor). ...... $25 
C Compiler Torture Test (checks a C compiler against K&R) ...........2.20-0240. $20 
PKG (task-to-task protocol package) . . 0. 6 5 0 4 a be ee we ee ee Joleen G20 
NGOSA(GS000 crone-aseeMiDlenye ek kk wk ee ek we ee awed 
Small-C (C subset compiler for 8080 and CC) a a eee ames ramen: ar, ee are yy $20 
tiny-c (C subsubset interpreter including the tiny-c'shell) 2... 2-2... .. eee eee eee $20 
Xlisp 1.5a (Lisp interpreter including tiny-Prolog in Lisp) .............2-+-+-+44 $20 
List-Pac (C functions for lists, stacks, and queues) ......---- 2-2. ee eee eee $20 
XLT Macro Processor (general purpose text translator) ©... 1. 1 1 ee ee $15 
C Tools (exception macros, we, PP; roff, grep, printf, hash, declare, banner, Pascal ve-C) ic SRA $15 
Data 

DNA Sequences (GenBank 48.0 of 10,913 sequences with fast similarity search program) .... . $150 
Protein Sequences (roughly 4,000 protein sequences with similarity search program) ........ $60 
Webster’s Second Dictionary (234,932"words). a $60 
U. S. Cities (names & longitude/latitude of 32,000 U.S. cities and 6,000 state boundary points) . . . $35 
The World Digitized (100,000 longitude/latitude of world country boundaries) .......... $30 
KST Fonts (13,200 characters in 139 mixed fonts: specify T#X or bitmap format) ......... $30 
NBS Hershey Fonts (1,377 stroke characters in 14 fonts)... 1... 2... 2. 2s eee wae “$15 
U. S. Map (15,701 points of state boundaries) 2. 2 2 1. 6 1 ee ee te vag eli 


The Austin Code Works 
11100 Leafwood Lane 
Austin, Tezas USA 78750-8409 
(512) 258-0785 
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SOFTWARE REVIEWS 


Marshal Pascal 


System requirements: | 28K 
RAM, MS-DOS or PC-DOS 
2.0 or later, two double- 
sided floppy drives or one 
double-sided floppy drive 
and one hard disk (versions 
are also available for CP/M- 
86 and Concurrent DOS), 
not copy protected 

Price: $189 

Available from: Marshal 
Language Systems, 1136-P 
Saranap Ave., P.O. Box 
2010, Walnut Creek, Callif. 
94595, (415) 947-1000, 
(800) 826-2222 (outside of 
Calif.) 

Support: Updates available, 
telephone support, users 
newsletter, and 90-day 
limited warranty on media 


Marshal Pascal is a level 0 implementa- 
tion of the International Standards Orga- 
nization (ISO) Pascal Standard. It is a 
professional-class, native code compiler 
for programmers at or beyond the inter- 
mediate level of experience. 

Novice programmers can use the com- 
piler with little difficulty if they supple- 
ment the reference manual and users 


Marshal Pascal features 


General information 


Feature Response 

Linker MLS LNK inc.) 

Assembler MASM {(PC/MS-DOS) 
or RASM (CP/M-86) 

Editor yes 

Debugger no 

Code type .EXE (PC/MS-DOS) 


or .CMD (CP/M-86) 
DOS 2 yes! 
Special reals opt. 8087/80287, 
32- or 64-bit 
Compile steps 42 


1. THOR is currently limited to working within one 
subdirectory. 

2. A fifth pass is required if an optional object 
code listing is requested. 

inc. = Included. 

opt. = Optional. 


Table 1. 


guides with an introductory Pascal text- 
book or other learning aid. Marshal Pas- 
cal provides many extensions to the ISO 
standard—such as a relaxed declaration 
order, separate compilations, variable- 
length-strings, and additional, predefined 
functions and procedures—that the more 
advanced programmer will appreciate 
and employ in developing programs. 

Based on features, the extensions also 
make Marshal Pascal an equal match to 
other Pascal compilers for the IBM PC. 
The use of nonstandard extensions in a 
program can be flagged with warning 
messages or ignored so that a program- 
mer can know if he or she has used a 
feature that may reduce portability or 
violate the standard. 

Bundled with the compiler is an inter- 
active shell called THOR, which Mar- 
shal Language Systems bills as “The 
Programmer’s Hammer.” THOR is a 
powerful tool that integrates the tasks of 
editing, compiling, reediting, and linking. 
It provides a complete environment for 
developing Pascal programs with the op- 
erating system out of the way. 

At the time of writing this review, 
Marshal Language Systems was deep 
into the development of a Turbo transla- 
tor/optimizer. This utility will translate 
source code written for Borland Interna- 
tional’s Turbo Pascal compiler into 
equivalent source code that Marshal Pas- 
cal will accept. _.~- 

The compiler, linker, librarian, THOR 


Language extensions 


Feature Availability 
Procedural no! 
parameters 
ELSE in case yes 
DOS call yes? 
Other interrupts no 
Chaining yes 
Overlays : yes 
Modules yes 
Units yes 
Command line yes 
Conditional yes? 
compilations 


1. Documentation implies yes, but a test program 
would not compile. 

2. Parameters are limited to AH and DX 
registers. 

3. This can be done via dead code removal if 
option Z1 or higher is specified. 


and its attendant modules, several sam- 
ple programs, and additional documenta- 
tion and information come on two ~ 
double-sided diskettes. Installation for a 
two-floppy-drive system involves copying 
the two distribution floppies and deleting 
unwanted files from your day-to-day 
copies. Installation for a system with a 
hard disk is very simple: copy both flop- 
pies to a subdirectory on your hard drive. 
The suggested subdirectory name is 

\ MLS. 

The content and arrangement of the 
feature chart in “Eight Pascal compilers 
for your IBM PC,” (Software Review, 
COMPUTER LANGUAGE, May 1986, 
pp. 81-90), is excellent. I have used the 
same design to describe the features of 
Marshal Pascal in Table 1. I have also 
used three of the same benchmarks. 

Use of extensions or special features in 
Marshal Pascal must be preceded with 
certain compiler options triggered by spe- 
cial comments such as: 


{$option,option,option,...} 


where option is a letter followed by a + 
or a — sign (to turn an option or feature 
on or off, respectively) or a number (to 
select one of several options). Options 
can also be enabled or selected in the 


Data types 

Feature Availability 
Constant bases 2..16 
Absolute no! 

Byte yes 

Word no 

Integer size 16, 32, 64? 


1. The predefined function Bind can provide this 
feature. 

2. 32- and 64-bit integers are available viasan 
implementation module and run-time library code. 
Direct compiler support for short, unsigned, and 
long integers is in development. 


SQL Compatible Query System adaptable to any 
operating environment. 


COL Query System. A subset of the Structured 
English Query Language (SEQUEL, or SQL) 
developed by IBM. Linked files, stored views, 
and nested queries result in a complete query 
capability. File system interaction isolated in an 
interface module. Extensive documentation 
guides user development of interfaces to other 
record oriented file handlers. 


Portable Application Support System 


Portable Windowing System. Hardware 
independent windowing system with borders, 
attributes, horizontal and vertical scrolling. 
User can construct interface file for any 
hardware. Interfaces provided for PC/XT/AT 
(screen memory interface and BIOS only 
interface), MS-DOS generic (using ANSI.SYS), 
Xenix (both with and without using the curses 
interface), and C-library (no attributes). 


Screen 1/0, Report, and Form Generation 
Systems. Field level interface between 
application programs, the Query System, and 
the file system. Complete input/output 
formatting and control, automatic scrolling on 
screens and automatic pagination on forms, 
process intervention points. Seven field types: 
8-bit unsigned binary, 16 bit signed binary, 16 
bit unsigned binary, 32 bit signed binary, 
monetary (based on 32 bit binary), string, and 
date. 


Including Source Code 
$395.00 


File System interfaces include 
C-tree and BTRIEVE. 


HARDWARE AND FILE SYSTEM 
INDEPENDENT 


MACHINE INDEPENDENT 
SOFTWARE CORPORATION 


41-19 BELL BLVD. 
BAYSIDE, N.Y. 11361 


VISA/Master Charge accepted 


(703) 435-0413 


*C-tree is a trademark of FairCom 


IBM, SEQUEL, PC, XT, AT are trademarks of IBM Corp. 
MS-DOS and Xenix are trademarks of Microsoft Corp. 


COL and the COL Logo are trademarks of Machine Independent Software 
Corporation. 
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command line to the compiler. If no op- 
tions are specified, the compiler assumes 
reasonable default settings. All options 
are summarized in Table 2. 

If the S1 or S2 option is selected, 
Marshal Pascal allows based numbers 
for integers. The syntax for this is: 


<base> # <based integer> # 


where <base> ranges from 2 to 16 and 
<based integer> is a series of digits 
within the range allowed by <base>, 
using A through F for bases 11 to 16. 
Thus integers are allowed in the follow- 
ing forms: 


2#10101111# binary} 
8#1776# octal} 
16#12be# jhex} 
16#ABCD# thex} 


Octal can also be coded by appending a 
b or B to the end of a series of base 8 
digits. 


Marshal Pascal supports both standard 
Pascal string types: 


type 
string4=packed array [1..4] of char; 
string7=packed array [1..7] of char; 


and variable-length string types: 


type 
str80: string; {maximum length of 80} 
str150: string[ 150]; 
{maximum length of 150} 


The limited, fixed-length string type 
comes from the ISO standard. Marshal 
Language Systems supplies source code 
for a small set of functions and proce- 
dures that provide variable-length fea- 
tures using packed arrays of characters. 
Simply include the source code package 
into any program that needs to conform 
to the standard. 

The variable-length type declaration 
must be enabled with the V option. 


Marshal Pascal compiler options 


A, assertion option 


B, file buffer size option 


C, run-time checks option 

E, subprogram naming in object code 
F, fast code option 

H, heap (dynamic storage)option 

|, include source text file 

L, source program list option 


O, object code list option 


R, real number option 


S, Standard Pascal option 
T, symbol table list option 


U, data alignment option 


V, variable-length string option 


- W, compile-time warning option 


X, code segment size option 


Y, array compatibility 


Z, optimization level 


Table 2. 


Compile or do not compile assert 
statements 


Specify file buffer size in bytes 


Select basic run-time checking or stack space 
checking with basic checking 


Select subprogram naming convention for a 


object code 


Bias optimization in favor of smaller code or 
faster code 


Select heap allocation method, short or long 
heap, and new/dispose 
or new/mark/release procedures 


Bring in a specified source file 
Control listing and cross referencing 
Control generation of object code listing 


Select software or coprocessor execution, 
single precision or double precision 
for real numbers 


Enforce Standard Pascal or allow extensions 


“Control symbol table generation 


Align data to next byte or align according to 
boundary needed by a variable’s data type 


Select a method of string type 
implemetion—standard Pascal fixed 
or extended variable-length 


Print or suppress warnings 
Select short or long code segment model 


Enforce Standard Pascal array compatibility or 
do not enforce : 


Select degree of code optimization 


When this option is activated (V+) the 
compiler will recognize four predefined 
string functions and two predefined 
string procedures to manipulate varia- 
bles. The maximum string length allowed 
with this extension is 255. 

The order of declaration is defined in 
standard Pascal as labels, constants, 
types, variables, and procedures and 
functions. 

This order can be relaxed in Marshal 
Pascal with either the S2 or S3 compiler 
options. When the relaxed order of decla- 
ration is activated, labels, constants, 
types, and variables can be declared in 
any order, without regard to the 
standard. 

Marshal Pascal also permits struc- 
tured constants and compile-time expres- 
sions within constants, if S2 or S3 is 
specified. This relaxation permits decla- 
rations like the following: 


const 
diff = abs(maxsize - minsize); 
area = length * width; 
uppercase = ['A’..'Z’]; 


type 
string5=packed array [1..5] of char; 
colortable = array [1..6] of 
record 
colorvalue: integer; 
colorname: stringS; 
end; 


const _ 
colortab = colortable ( 
(ly ced"), 


(5, ‘gray ’), 
(6, 'white’) ); 


Colortable is defined as a type and 
colortab as a structured constant of this 
type. 
If the S2 or S3 option is given, LOOP 
and RETURN statements are permitted. 
The form of the loop construct is: 


loop: 
statement] ; 
statement2; 


statementn; 
end; 


The loop continues until an EXIT state- 
ment is executed, typically in an JF 
statement. Loops can be nested, and an 
EXIT always terminates the innermost 
loop. The RETURN statement is simply 
the word “return.” RETURN terminates 
a function or procedure and passes con- 
trol back to the caller of the function or 
procedure. 


Microsoft Lattice 


DOS Xenix Turbo C Novell VMS .Macintosh Microport Turbo C Fox 10-NET 


Turbo C_ unix 


Microsoft Lattice Turbo C Aztec Computer Innovation Mark Williams 


FILE HANDLER 


Performance and Portability 


your new programs, doesn’t it make sense fo 
insure they perform like lightning and can be 
ported with ease? 


c-tree: Multi-Key ISAM Functions 
For Single User, Network, & Multi 
Tasking Systems 

Based on the most advanced B+ Tree routines 
available today, G-tree gives you un- 
matched keyed file accessing performance and 
complete C Source Code. Thousands of profes- 
sional C programmers are already enjoying 
c-tree’s royalty-free benefits, outstanding 
performance, and unparalleled portability. 


Only FairCom provides single and multi-user 
capabilities. in one source code package, 
including locking routines for Unix, Xenix, and 
DOS 3.1., for one low price! In addition, 
ce-tree supports fixed and variable record 
length data files; fixed and variable length key 
values with key compression; multiple indices 
ina single index file; and automatic sharing of 
file descriptors. 


r-tree: Multi-File Report Generator 


r-tree builds on the power of c-tree 
fo provide sophisticated, multi-line reports. 
Information spanning multiple files may be 
used for display purposes or to direct record 
selection. You can develop new reports or 
change existing reports without programming 
or recompiling and can use any text editor to 


r+: Le 


Everything Isn’t As 
Accommodating As 
c-tree /r-tree 


For all the time you devote to developing 


a2 
§ i Complete C Source Code & No Royalties! 


Turbo C Aztec Computer Innovation Mark Willams Turbo C 


ISN’T IT A PITY... 


Et 
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REPORT GENERATOR 


create or modify r-tree report scripts 
including the complete report layout. At your 
option, end users may even modify the report 
scripts you provide. 


Unlimited Virtual Fields; Automatic File 
Traversal aed 


r-tree report scripts can define any number 
of virtual fields based on complex computational 
expressions involving application defined data 
Objects and other virtual fields. In addition, 
r-tree automatically computes values 
based on the MAX, MIN, SUM, FRQ, or AVG of 
values spread over multiple records. r-tree 
even lets you nest these computational func- 
tions, causing files from different logical levels 
to be automatically traversed. 


Unlike other report generators, r-tree allows 
you fo distribute executable code capable of 
producing new reports or changing existing 
reports without royalty payments, provided the 
code is tied fo an application. Your complete 
source code also includes the report script 
interpreter and compiler. 


How To Order 


Put FairCom leadership in programmers utilities 
fo work for you. Order G-tree today for 
$395 or r-tree for $295. (When ordered 
together, r-tree is only $255). For VISA, 
MasterCard and C.0.D. orders, call 314/445- 
6833. For e-tree benchmark comparisons, 
write Faircom, 4006 West Broadway, Colum- 
bia, MO 65203. 


Xenix is a registered trademark of Microsoft Corp. 
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Functions in Marshal Pascal can re- 
turn any structure type except files . 
through an assignment to the function 
name, if the S2 or S3 compiler option is 
selected. Standard Pascal permits only 
pointers to simple types or simple types 
to be returned by functions. 

To access the command line, Marshal 
Pascal has two predefined, global 
variables: 


var 
argc:integer; 
argv:array [0..31] of array 
[1..256] — of char; 


This feature is similar to the mechanism 
for accessing the command line in most 
C implementations. Arge is the number 
of parameters specified on the invoking 


command line. Argy is an array of point- 
ers to arrays that contain the parameters. 
Argc is always at least 1 since the name 
of the program is treated as the first 
parameter. 

Table 3 details the more notable func- 
tions or procedures available in this 
package (none are required by the ISO 
standard). 


The syntax of the argument lists to the 


write and writeln procedures has been 
extended to allow the output of based 
expressions: 


write ( <file>, <expr> :: <base> : 
<digits> : <width> ); 


<file> is a file variable. If <file> is 
omitted, the standard output file is as- 


sumed. gas is an expression or data 


Predefined functions and procedures in Marshal Pascal 


function address (x):integer; 
function bind (x):anytype ; 


function is87:boolean; 


{returns run-time address of} 
fany variable x } 


{returns x as any type of } 
lane } 

returns TRUE if an 8087 or } 
an 80287 is installed in } 


the run-time machine, FALSE} 
otherwise } 


function isfilelfnzpacked array [1..n] of char):boolean; 


function isopentvar f:filetype):boolean; 


procedure assertlbexp:boolean); 


{returns TRUE if fn is the } 
iname of an existing file, } 
IPALSE otherwise } 


freturns TRUE if the file } 
jvariable f has been opened, 
{FALSE otherwise } 


iu the value of the boolean} 
lexpression bexp is TRUE, } y 
{program execution eeitinues} 
jo otherwise execution is } 
{terminated with a run time } 
e error; if the A- option is} 
ispecified, it is treated as} 

{a comment and ignored } 


procedure loadproginame,param:packed array [1..n] of char; 
vars stat, ustat:integer); 


procedure retprog(stat:integer); 


Table 3. 
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{loads and executes the } 
oe given by the string} 
iname, passing param to it } 
Jas a command line parameter} 
Istring; sstat is set to 1 if} 

the program was iguded aie t 
run, Q otherwise; ustat is | 

the return code from the } 
program that was loaded } 


and passes stat back to the} 
caller of loadprog as the a 
{return status | 


as the main program} 


structure of any type; <base> is 2, 8, 
or 16 for binary, octal, or hexadecimal 
output digits, respectively; <digits> is 
the number of digits of <expr> to out- 
put in the base selected by <base>; and 
<width> is the total width of the out- 
put field. If <width> is greater than 
<digits>, then the output is right-justi- 
fied within a field <width> columns 
wide. 

Marshal Language Systems attributes 
part of the efficiency of Marshal Pascal 
to the development of its linker. A spe- 
cial linker is needed because object files 
from the compiler are not compatible 
with those in the standard Intel format. 
The linker resolves references to external 
names defined in the run-time library or 
in separately compiled modules. It sets 
the size of the stack or heap used in the 
program and gives you a link map and a 
symbol cross-reference. Marshal Lan- 
guage Systems’ linker also builds overlay 
structures into the output module. You 
can incorporate assembler language rou- 
tines by passing the object code from the 
assembler through a utility to convert it 
from the standard format to the Marshal 
Pascal format. 

Marshal Language Systems also sup- 
plies a special librarian for maintaining 
code libraries in its format. The typical 
functions of listing, adding, replacing, 
and deleting modules are supported. The 
library can contain object code from the 
compiler or object code that has passed 
through the conversion utility. 


Marshal Language Systems has given ~ 


Marshal Pascal three extended con- 
structs to define separate compilation 
units. If option S2 or S3 is selected, they 
are available in these forms: 


|. Independent module 
module <module name> ...; 
<declares> 
begin 
<statements > 
end. 
ll. Definition module 


definition module <module name> 


<declares> 
end. 


Implementation module 


implementation module <module 
name> ...; 
<declares> 
begin 
<statements> 
end. 


In forms I and III, <declares> com- 
prises constant, type, variable, and 1M- 
PORT declarations along with complete 
function and procedure subprograms. 


The <statements> within the <begin> 
<end.> block represent initialization 
code. 

In form I, <declares> comprises 
constant, type, and variable declarations, 
along with function and procedure head- 
ings, without any statements from the 
body of the subprograms. 

Forms II and III are tied together. 
The first gives the names and interfaces 
(parameter lists) of the subprograms 
coded in the second. An IMPORT decla- 
ration is of the form: 


import <module name 1>, 
<module name 2>, 
... <module name n>; 


Each <module name> is the name of a 
definition module of form II. 

Marshal Pascal provides two-methods 
of separate compilations. In the first, a 
main program declares the subprograms 
within an independent module as exter- 
nal routines. It then calls those subpro- 
grams as needed. To execute the initiali- 
zation code of the independent module, 
the main program simply declares the 
module name as external and calls it 
with no parameters. This method is simi- 
lar to that found in other Pascal compil- 
ers. The main program and the modules 
can be compiled independently of each 
other. Both must be recompiled if the pa- 
rameter lists to a subprogram are 
changed. 

In the second method of separate com- 
pilation, a main program imports the 
names of definition modules. It then calls 
the subprograms within the implementa- 
tion module as needed. The initialization 
code in the implementation module is 
called automatically before any routines 
within it are called. If the module is im- 
ported by a main program, the initializa- 
tion code is called once. But if the mod- 
ule is imported by a subprogram, the 
initialization code is executed whenever 
that subprogram is called. 

Note that independent modules (form 
I) can import definition modules (form 
II). This method is similar to that found 
in Modula-2 and UCSD Pascal. The 
main program, definition modules, and 
implementation modules can be compiled 
separately. If the interface to a subpro- 
gram in an implementation module 
changes, all must be recompiled. But if 
only the code in the body of a subpro- 
gram changes, then only the implementa- 
tion module need be recompiled. This 
method provides an environment in 
which considerable development proceeds 
independently. 

Source code for the empty program, 
CALC, and the Sieve of Eratosthenes 


were obtained from the COMPUTER 
LANGUAGE software review already 
mentioned. The code for the integer bub- 
ble sort routine was not readily available 
so another calculation intensive program, 
MATRIX, was used. The code for MA- 
TRIX can be found in Pascal Programs 
for Scientists and Engineers, by Alan R. 
Miller, SYBEX Inc., 1981. 

MATRIX is a 110-line program that 
inverts a 10x10 matrix. The original was 
modified to initialize and invert the ma- 
trix 10 times to obtain intervals greater 
than a reaction time. Displaying the final 
matrix was omitted because it caught an 
obscure bug—the program froze after 
about 10 lines of output to the screen; a 
warm reboot was required to continue 
the program. Both 8087 and software 
emulation of arithmetic operations were 
benchmarked. 

The maximum degree of code optimiz- 
ation, Z63, and smaller code over faster 
code, FO, were specified. in compiling the 
benchmarks. Single-precision reals and 
16-bit integers were used throughout. 
Since BCD is not available in Marshal 
Pascal, those figures are omitted from 
the tables. 

THOR was used to compile and link 
all the benchmark programs. The com- 
piler and linker were loaded from a 
20MB hard disk because a virtual disk 
large enough to hold all the necessary 
files would not leave sufficient memory 
for the second pass of the compiler. A 
virtual disk in extended memory would 
probably bypass this restriction. Assum- 
ing the compile and link time for the 
empty program represents the minimum 
overhead, subtracting it from the same 
measurement for the other programs 
should give the times that could be 
clocked if all files were on a virtual disk. 
The benchmarks appear in Table 4. 

The THOR shell is a timesaving tool 
for automating the program development 
process. Marshal Pascal is a four-pass 
compiler. Errors can be detected in any 
of the passes. Once a program compiles 
without errors, it must be linked with the 
proper libraries and output as an .EXE 
or .CMD file for the operating system to 
invoke it. THOR hides all these mun- 
dane details from the user and allows 
him or her to concentrate on the develop- 
ment of the application. 

THOR’s primary screen appears in 
Figure | and its alternate screen in Fig- 
ure 2. From the primary screen, you can 
trigger nine different actions by pressing 
a function key; the 10th function key 
takes you to the alternate screen. From 
that screen you can trigger nine other ac- 
tions or return to the main menu. 

During compilations progress messages 
appear in the message, status, or error 
areas. The entry area shows keying to 
supply file names or other data to a trig- 


The Quality of 
the MKS Toolkit 


Speaks for Itself. 
(Need We Say More?*) 


“The MKS Toolkit is a terrific product! I depend 
on it every day.” 


“This is a very impressive piece of work and it 
can truthfully be said that it has made my 
PC-clone (NEC V-20 @8MHz) into a computer! 
There is little doubt that MKS is offering the 
package with the most user power for the dollar 
on the market today.” 


“T wouldn’t be without the MKS stuff on a PC. And 
the documentation is superb! I use the MKS man 
pages to learn how to use awk and sed more 
efficiently on our BSD UNIX system at work!” 


“The Korn shell is great!" 


“This is a solid product. The program that 
makes my day is cpio, which allows me to move 
files to/from UNIX with minimum hassle and 
preservation of mod dates for make use.” 


“This program is a godsend for anyone who has 
to use both UNIX and MS-DOS..." 


“T like the MKS Toolkit a lot. The idea of having 
the same editor on the PC and UNIX machines 
sure makes my life a lot easier.” 


“. at $139.00 the Toolkit is a bargain. 
.. [ hope you all reap the rewards of your 
virtue.” 


“The MKS Toolkit has provided me with UNIX 
capabilities I thought I lost when I moved to my 
PG 


“I'm impressed with the MKS tools, in particular 
with the breadth of what you provide. . . . I can 
see an order of quality and completeness in the 
MKS tools not found in the PC/VI package.” 


*These are unsolicited comments from MKS 
Toolkit users. 


Price: $139 


Now available in a 
separate package: 
, SV 
Price: $75 


e 
° 
Mortice Kern Systems Inc. 
43 Bridgeport Road East, Waterloo, Ontario, 
Canada N2J 2J4 (519) 884-2251 
For information or ordering call collect. 
Prices quoted in U.S. funds. MasterCard, VISA, American Express, and 
purchase orders accepted. OEM & dealer inquiries invited. UNIX is a 
trademark of Bell Labs. MS-DOS is a trademark of Microsoft Corp. 
Site-licensed to major American corporations. No UNIX licence required. 
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_ Object code size 


gered action. THOR keeps a log of time 
spent on tasks while you are running it. 
Upon pressing the <Escape> key to 
quit, THOR writes the log back to disk 
for later analysis. THOR also executes 
custom command scripts that provide 
some of the capabilities found in typical 
make utilities, such as invoking a pro- 
gram if files are out-of-date with each 
other. 

A default editor, THOREDIT, is bun- 
dled with THOR. THOREDIT is a spe- 
cial, authorized rewrite of Sammy Mit- 
chell’s Qedit design to run in the THOR 
environment. If errors are detected in the 
compile steps, THOR will ask if you 
want to edit the source file. If you reply 
yes, it will load and run THOREDIT, 
splitting the screen into halves with the 
source in one half and the error messages 
or warnings in the other. You can make 
the corrections, exit the editor, and re- 
compile the program with a few 
keystrokes. 

If you prefer the VEDIT, VPLUS, or 
BRIEF editors, THOR will call them in- 
stead of THOREDIT. The screen- 
splitting feature is implemented for them 


Marshal Pascal benchmarks 


Empty Program 

Compile and link time 61.4 sec 
Object code size 97 bytes 
Execution module size 1922 bytes 


CALC 

Software emulation of real arithmetic 
Compile and link time 74.4 sec 

Object code size 715 bytes 

Execution module size 5520 bytes 
Execution time 10.2 sec 

Error -5.9605E-08 


8087 coprocessor arithmetic 
Compile and link time 73.3 sec 
Object code size 704 bytes 
Execution module size 4254 bytes 
Execution time 2.0 sec 
Error -5.9605E-08 


MATRIX 

Software emulation of real arithmetic 
Compile and link time 85.8 sec 

Object code size 2132 bytes 

Execution module size 5406 bytes 
Execution time (x10) 8.2 sec 


8087 coprocessor arithmetic 
Compile and link time 83.3 sec 
Object code size 2061 bytes 
_ Execution module size 4080 bytes 
Execution time (x10) 3.2 sec 


_ Sieve of Eratosthenes 

Compile and link time 69.4 sec 
703 bytes 
Execution module size 2866 bytes 
Execution time 5.4 sec 


Table 4. 
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as well. THOR will call any other editor 
or utility, and some of THOR’s other 
features can be altered in a configuration 
file. 

Marshal Pascal can also be executed 
through a batch command file; however, 
the THOR environment probably will be 
more desirable and productive for most 
programmers. 

I recommend Marshal Pascal if you 
are looking for a medium-priced compil- 
er with high-priced features and perfor- 
mance. With Marshal Pascal you may 
adhere to the ISO standard or use the 
program’s many extensions. The inclu- 
sion of the THOR shell and an editor 


aaron Sarre Seas sea EET IE 
| Time: 13:39:58 | 


Date: 06-27-87 


———————— THOR - The Programmer's Hanmer 
Directory & disk label: \MLS on PCDOS319 


Editor: THOREDIT 


along with the promise of a Turbo Pascal 
translator/optimizer make this package 
very competitive. 

Update: Marshal Pascal’s Turbo trans- 
lator converts most Turbo Pascal code to 
a Marshal Pascal compilable format. 
Graphics routines and extensions similar 
to those found in Turbo Pascal are also 
supported. The THOR environment now 
allows include files. Additional compile- 
time options have been added to permit 
more code and data manipulation, and 
the bugs discovered in the initial release 


of Marshal Pascal have been eliminated. [Fj 


By Mark Gayman 


Fl -Campile 

F2 -Canpile & Link 
F3 -»Assemble 

F4 -eLink — 

F5 -»Run Editor 

Fe -Enter DOS 

F7 -»Listing 

F8 Display Files 
FQ Command Script 
Fly -»Alternate Menu 


Primary — 


Status—=| 


Error-—>| 


Figure 1. 
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THOR - The brogrammer's Hammer 
Directory & disk label: \MLS on PCDOS310 


Editor: THOREDIT 


Altermate 
—>Concatenate 
Delete File 
-eLibrarian 
-=Change Directory 
~eChange Editor 
-©Fuli Module Listing 
Summary Module Listing 
~~Display Files 
—Run Program 


F1O -eMain Menu 


Message+| Select function key from menu above - ESC to terminate 


Status—>| 


Error-->| 


Figure 2. 
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GRAPHICS TOOLS 
FOR C and FORTRAN- Vea 
PROGRAMMERS 


GRAFLIB - 


Source Included 


FORTRAN-77 & C callable screen 
graphics routines. Supports CGA, EGA 
and Hercules Graphics Cards. 


Source Included 
Plotting routines for Hewlett-Packard & 
HPGL compatible plotters. Available 
in FORTRAN-77 & C. 


PLOTHP 


PLOTHI 


Source Included 
Plotting routines for Houston 


Availale in FORTRAN-77 & C. 


FORTLIB 


Source Included 
Add C-Like power to your FORTRAN-77 


Programs with our 120+ FORTRAN callable 


assembly and FORTRAN-77 Routines. 


Call or write for a Brochure 


SUTRASOFT 


P.O. Box 1733 
Sugar Land, TX 77487-1733 
(713) 491-2088 
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$175.00 


$175.00 


$175.00 


instruments DM/PL compatible plotters. 


$125.00 
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C aa Pascal 
for MS-DOS 


MetaWare Incorporated:.announces the first 
available C and Pascal compilers that generate 


protected-mode 80386 code 


for running on any 80386 machine that runs MS-DOS (eg., the 
Compaq Deskpro 386 or the IBM Personal System/2 Model 80). 
The compilers are functionally identical to our well-respected 
8086/286 MS-DOS High C ™ and Professional Pascal ™ com- 
pilers, but now you can get them generating 80386 code. 

There’s no reason to wait! Industry leaders such as ANSA and 
Fox Software are already converting their 16-bit database products 
to 32-bit protected mode, getting increases in speed and function- 
ality. Dont wait years for Microsoft's 386DOS — your competition 
will havea big jump on you! 

Expand your application to the large 32-bit address space and 
the full 32-bit registers of the 80386. Contact MetaWare for your 
80386 software solution today! 


(408) 429-6382, telex 493-0879. 


Mats AN, Ws 


INCORPORATED 
903 Pacific Avenue, Suite 201 e Santa Cruz, CA 95060-4429 
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Throw Away Your Flowcharts!! 
Cut Development Time By Up To 
30% 


The GeneratoR is the online design tool, 
based on the popular Warnicr/Orr diagrams 
that can generate source code and program 
documentation from completed — design 
diagrams. 


Design Diagrams 
Generates ]| Source Code 


Documentation 


GeneratoR 


Languages| C 


Introductory Special 


Pascal GeneratoR :$90.95 C GeneratoR :$104.95 
C & Pascal GeneratoR :$149.95 Demo GeneratoR :$10.00 
C or Pascal Source Code Convertor :$39.95 
Diagram Editor: $39.95 
FREE -Source Code Converter and Diagram Editor with 
GeneratoR Purchase 


For all orders, add $1.50 Shipping and Handling. Cash, Check, COD, Visa and MC 
accepted. In Kansas add 5% sales tax 
Call SoftWare Support 913-354-1618 
701 Jackson B-5 ‘Topeka, Kansas 66603 
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C CODE FROM 


TP2C *TURBO PASCAL 


YOU NEED TP2C ™ IF: 


e You Like the ease of Turbo Pascal but wish to 
create linkable libraries. 

e Your Turbo Pascal programs are too large for 
COM files. 

e You want Pascal strings and seis in C. 


TP2c™ 


* Produces standard C code DIRECT from Turbo 
Pascal programs. 

* Create function libraries from Pascal routines. 

* Supports strings, sets, and Pascal I/O. 

* Pascal programmers may use as an aid in 
learning C. 

* Move Turbo Pascal programs to Unix or other 
machines. 

* Translate whole programs or program segments 

* For PC-DOS and MS-DOS machines. 


Order Today only $249.00 


BISS of Louisiana 
5432 Superior Drive, 
Suite A-1, 

Baton Rouge, LA 70816 
(504) 295-0260 


*Turbo Pascal is a registered trademark at Borland International 
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Pascal-2 


System requirements: MS- 
DOS or PC-DOS 2.0 or 
later, 320K RAM, one 
double-sided floppy drive 
and one hard 
Microsoft hakert - 3.0 or 
later or IBM PC-DOS 
Linker v. 2.3 or later, not 
copy protected 

Price: 

Available from: Oregon 
Software, 6915 S. 
Macadam Ave., Portland, 
Ore. 97219- 0397, 
(503)245-2202 

Support: Upgrades 
available, mail 
notification of new 
releases, teleohone 
support, 90- ey mits’ 
warranty on med 


Oregon Software’s Pascal-2 compiler for 
MS-DOS and PC-DOS is a full imple- 
mentation of the International Standards 
Organization (ISO) Standard 7185, vali- 
dated at level 1. The compiler generates 
native code for the 8088, 8086, 80186, or 
80286 microprocessors. While Pascal-2 is 
targeted to the professional programmer 
or team, students of Pascal can use the 
compiler with the aid of a textbook or 
primer. It is replete with support routines 
that provide access to all parts of the op- 
erating system. 

Pascal-2 is certified by the Federal 
Software Management Support Center 
(FSMSC) and the British Standards In- 
stitute (BSI). FSMSC certification per- 
mits purchase and use by agencies of the 
USS. Federal Government. Oregon Soft- 
ware also markets Pascal compilers for 
Digital Equipment Corp.’s VAX and 
PDP-11 systems (under VMS, ULTRIX, 


Pascal-2 features 


General information 


Feature Response 

Linker MS-DOS or PC-DOS 
linker? 

Assembler MASM 

Editor no 

Debugger yes 

Code type .EXE 

DOS 2 yes 

Special reals opt. 8087 or 80287 
32- or 64-bit 

Compile steps 5 


1. Some early versions of either linker can pro- 
cess only large memory model programs. 
opt. = optional 


Table 1. 
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RSX/RT11, or RSTS), Motorola’s 
68000/20 systems (under UNIX or 
VERSADOS), National Semiconduc- 
tor’s 32000 family processors (under 
UNIX), and the IBM PC/AT (under 
XENIX). Programs written with Pascal- 
2 for MS-DOS and PC-DOS machines 
can be ported to the other machines 
mentioned with minor source 
conversions. 

The compiler and programs come on 
four double-sided diskettes. To install the 
package on your hard disk, you execute a 
batch file that creates the proper subdir- 
ectories and copies files from the floppies 
to the hard disk. The installation proce- 
dure tests your linker and determines if 
it can process Pascal-2 object files. If you 
have, the BRIEF editor, two editor macro 
files are copied to your hard disk. The 
macros allow you to run the compiler, lo- 
cate errors in the source file as they are 
detected by the compiler passes, edit the 
source, and recompile the program. 
These tasks are performed from within 
the editor. The second-to-last step of the 
installation procedure compiles and runs 
a large test program that verifies compil- 
er passes, the linker, and correct program 
operation. 

Table 1 lists Pascal-2’s main features. 
(Tables used in this review are patterned 
after the tables that appeared in “Eight 
Pascal compilers for your IBM PC,” 
(COMPUTER LANGUAGE, May 
1986, pp. 81-90.) 

Use of extensions or special features in 
Pascal-2 must be preceded with certain 
compiler options triggered by special 
comments such as: 


{$option,option,option,...} 


where option is generally a word. Some 
options can be toggled off by prepending 
a special word with “no.” The options 
may also be passed to the compiler on 
the command line. Some switches may 
be turned on and: off throughout the 
source code. Others are global to the en- 
tire program. Option switches are sum- 
marized in Table 2. 


Language extensions 


Feature Availability 
Procedural yes 
parameters 

ELSE in case yes 
DOS call yes 
Other interrupts yes 
Chaining yes 
Overlays yes 
Modules yes 
Units no 
Command line yes 
Conditional yes! 


compilations 


1. This can be done via dead code elimination if 
the nodebug compiler switch is specified. 


If the nofpp compiler switch is speci- 
fied, the compiler tells the linker to use a 
library that runs on machines with or 
without an 8087 coprocessor. If the chip 
is present, it is used; if it is absent, real 
arithmetic is emulated. If the fpp switch 
is specified, the generated code must run 
on a machine that has the math 
coprocessor. 


Based constants of the form: 
<base> # <digits> 


and octal constants (denoted by a b or B 
at the end) are allowed in Pascal-2. 

Declaration-statement ordering in Pas- 
cal-2 is relaxed if the standard switch is 
omitted. Omission of this switch also en- 
ables: 

@ Structured constants 

w Variable-length string variables and 
associated procedures and functions 

@ The univ attribute for relaxing param- 
eter type checking 

w Origin variables at any absolute 
address 

mw The otherwise clause in case 
statements. 

A package of string functions and pro- 
cedures employing the standard array of 
packed characters is available for imple- 
menting variable-length strings within 
the ISO standard. 

Two predefined functions, ref and 
loophole, permit pointer generation and 


type casting to override some restrictions. — 


in Pascal. If these are used, the nopoin-~ 
tercheck switch must be in effect. 
Conformant arrays, included in level 1 
of the ISO standard, are implemented in 
Pascal-2. This feature allows you to pass 
arrays of different sizes and bounds to 
functions or procedures. A sample func- 
tion, taken from the Pascal-2 
Language Reference, illustrates this 
concept: 


function AddArray (var 
Arr: array [Lower..Upper: integer] 


Data types 

Feature Availability 
_ Constant bases 2.16 

Absolute yes! 

Byte yes 

Word yes? 

Integer size ove 6) 


1. Large memory model is required. 
2. A 32-bit unsigned integer type is also» 
available. 


unstructured 
flow charts with 


Nassi-Shneiderman 


STRUCTURED. 
FLOW DIAGRAMS 


NSCharts are created 
directly from text files. 


Text files consist of 
NSPDL, a Siltronix 
structured design 


Now you can use QPARSER+ to develop com- | 
pilers, interpreters, complex user-interfaces, language } 
1 & file format translators (i.e. Pascal to C, Bit Map 
ito Postscript), language debuggers like lint, .etc.. 


Develop language translators in C and Pascal 


j within the IBM PC/XT/AT or VAX/VMS environments. | 
# A new user manual, automated syntax tree con- 
} struction and an advanced code generation language 


are just a few of the improvements over the original | 

language. weed ae 
MN ikbige 

Translators to NSPDL Moet ted 

from FORTRAN 77, C, 

Pascal, SDDL PDL and 

Caine-Farber-Gordon PDL are also available. 

NSChart runs on Macintosh™ and IBM™ PCs. Both 

feature a What-You-See-Is-What-You-Get-Interface. 


LIKE NES SO 


fom LT ROND< ' Another translation by QPARSER: | 


I Just $475 (omar) — FREE demo disk available ! 
P.O.Box 82544 San Diego, CA. 92138 I I 
s I QCAD Systems I 
Sales (800 ) 637. 4888 Tech. Support 1164 Hyde Ave., San Jose, OK 95129 (408) 995-6884 
Macintosh is'a trademark of Apple Computer Inc. ana Outside Calif. call TOLL-FREE = (800) ) 538-9787 a Sita 
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SCIENTIFIC/ENGINEERING 
GRAPHIC TOOLS 
for the IBM PC and compatibles 


FORTRAN/Pascal tools: GRAFMATIC (screen graphics) 
and PLOTMATIC (pen plotter driver) 

These packages provide 2D and 3D plotting capabilities 
for programmers writing in a variety of FORTRAN/Pascal 
environments. We support MS, R-M, LAHEY FORTRAN 
“*!and more. PLOTMATIC supports HP or Houston Instru- 
ment plotters. Font module available too! 

Don’t want to program? Just ask for OMNIPLOT! Menu- 
driven, fully documented integrated scientific graphics. 
Write or call for complete information and ordering in 
structions. 

GRAFMATIC—PLOTMATIC—OMNIPLOT [S] & [P] 


10.0 100.0 1000.0 


the dBx” Translator 


e C from dBASE II, III, III+ programs 

© Move to UNIX, XENIX, QNX, MAC, AMIGA 
Faster, more reliable IBM PC programs 
Supports multi-user and network fn = 
Run your code on any standard C system eee 
Know dBASE? Learn C easily. = Wate : 
Priced from $350; available from distributors 
Includes full screen handler library 
Supports a choice of C database managers 


(2H) AIN3NOISS 


CONCENTRATION 


0 


from (Y)Desktop Ai ic = ne : 


1720 Post Road East, Westport, CT 06880 Pam retth des' op 
Telephone: 203-255-3400 Telex: 6502972226MCI Oe ae 


MCIMAIL-DESKTOPAI Microcompatibles, 301 Prelude Drive, Silver Spring, MD 20901 
4BASE Ie a trademark of Ashton-Tats (301) 593-0683 


dBx Ie a trademark of Dasktop Al 
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Pascal-2 compiler switches 


Program switches 
bytealloc 


double 

include =(<dir>,<dir>) 
largemodel 

nomain 

shortints 

nowalkback 

Listing switches 

debug 

editlist 

errors 


list 
profile 


Code switches 
codeconst 


macro 
stmtnum 


~ details 
object 
Data section switches 
codesect='<name>"’ 
module='<name>’ 
own='<name>’ 
Processor switches 
80286 
bstep 
fpp 
Checking switches 
check : 
indexcheck 


pointercheck 
rangecheck 


stackcheck 
standard 


level 
times 


Table 2. 
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—allocate one byte to subranges that 
fit in 8 bits, even if unpacked 
—do real arithmetic in 
double precision 
—specify where include files, given in 
%include directives, are found 
—compile to large memory model using 
four byte addresses and pointers 
—don't expect a main procedure in the 
source file, only external definitions 
—compile using 16-bit integers” 
instead of 32 
— don’t include object code to display a call 
chain trace when errors occur at run fime 


—generate a source listing and other files 
for use by the debugger 
—generate a source listing that BRIEF 
can use 
—list only source lines with errors 
—generate a full listing 
—generate special output for use 
by the profiler 


—place all constants used by case 
statements in the same segment 
as the executable code 

—generate an assembler language source 
file for the program instead of an object 
code file 

—generate statement numbers in the 
assembler language file produced by 
the macro switch 

—add additional data to the listing 
generated by the macro switch 

—generate an object code file instead of 
an assembler language file 


—give the code section the 
name <name> _IEXT instead of deriving 
the name from the source file 

—dgive a compilation unit 
the name <name> 

—put global-level variables in a private 
section named <name> 


—generate object code to run on a 
80286 processor 

—generate object code to run on certain 
80186 processors 

—generate code fo run on a machine with a 


8087 


—generate code that performs all checks 
at run time 

—generate code to check array bounds 
at run time 

—dgenerate code to check for valid pointers 

—dgenerate code to check subrange 
assignments and case statements 

—generate code fo check for 
stack overflow 

—report use of extensions to level | of the 
ISO standard 

—report level 1 features as errors 

—report elapsed time and provide lines- 
per-minute statistics for the compiler 
passes 


of integer): integer; 


var 
|, Sum: integer; 
begin 
Sum := O; 
for | := Lower to Upper DO 


Sum := Sum + Arr{I]s 
AddArray := Sum; 
end; 


This function sums the elements of the 
array of integers supplied by its caller. A 
parameter to AddArray must have been 
declared as an array of integers with in- 
teger bounds. 

Pascal-2 allows an external function or 
procedure to be declared with the FOR- 
TRAN or nonPascal attribute. The first 
permits use of routines from Microsoft’s 
FORTRAN or Pascal compilers, and the 
second permits use of routines from C 
compilers by other vendors. 

Pascal-2 lets you have control over 
some operations of the input/output sys- 
tem through control switches. These 
switches are given in a quoted string as 
the third parameters to the reset and re- 
write procedures, and they control buffer 
sizes and access modes. 

Oregon Software supplies two include 
files and library routines to ease the con- 
version of Turbo Pascal programs to Pas- 
cal-2. The documentation includes a list 
of search and replace strings that change 
many of Turbo Pascal’s function or pro- 
cedure names to the Pascal-2 equiv- 
alents. An appendix details the differ- 
ences between Turbo Pascal and 
Pascal-2. 

Pascal-2 implements separate compila- 
tions by external modules: complete 
function or procedure source files that 
are compiled with the nomain switch. 
Data can be global, private, or shared 
among external modules. Oregon Soft- 
ware provides a package of macros that 
assists you in writing assembler routines 
called from Pascal-2. 

Of the nine Pascal-2 libraries, four are 
for the two memory models and two inte- 
ger sizes, two are for the debugger and 
profiler, two are for real (floating point) 
arithmetic, and one is for a version of In- 
tel’s Common Elementary Library 
(CEL) for the 8087/80287 math co- 
processor. The interfaces to these librar- 
ies are given in four definition files for 
inclusion into any program. Notable rou- 
tines in the libraries fall into the follow- 
ing categories: 

w Utility functions and procedures 
mw Text conversion routines 

w Low-level memory access routines 
m Turbo Pascal compatible routines 


The best bugfighter 
in the usiness 


When your program is runiias the bus at somethin 
‘approaching the speed of light, and the deadline is 
morrow, the last thing you want is a compiler 
malfunction. Prospero’s Pro Pascal compilers give 
you the best in quality and reliability. 

_ Among professional programmers with deadlines 
_ to meet, no other Pascal compiler has a reputation to 
match. Pro Pascal is a full-specification ISO 7185 
compiler, officially validated as conforming 
completely to the international standard without a 
single error. It has a number of carefully chosen 
extensions for real-world computing. The package 
includes libraries, a linker, librarian, X-ref program, 
and a powerful symbolic debugger. 

Prospero Software is dedicated to languages and to 
customer support. For an opinion ask a colleague; for 
information call 01-741 8531 or write to Prospero 
Software Ltd, 190 Castelnau, SW13 9DH, England. 


Prospero Software 
7 


@ Screen control routines (these require 
the ANSI.SYS device driver) 

w 8087 support or emulation, including 
functions for trigonometry, division and 
comparison, rounding, logarithms, expo- 
nentiation, and complex numbers. 

An interactive, run-time debugger and 
an execution profiler are part of : 
Pascal-2. When the debugger is activated 
by the debug switch to the compiler, the 
compiler produces special symbol table 
and statement map files and tells the 
linker to include the library code for the 
debugger. 

When the program under test is in- 
voked, the debugger gains control imme- 
diately. With a program listing, you can 
step through the program while probing 
for errors within the code. Table 3 sum- 
marizes the commands available in the 
debugger. Many take parameters after 
the initial letter. 

The profiler is activated with a switch 
to the compiler and comes up when the 
program is executed. You supply the 
name of the program to sample, and ex- 
ecution proceeds at a slow speed. The 
output from the profiler summarizes the 


Commands in Pascal-2’s debugger 


Command Action Empty program 
B Sai lynsey: Compile and link time 52.2 sec 
= = = : Object code size 512 bytes 
K Clear (kill) breakpoint Execution module size 5960 bytes ee 
V Set a variable (data change) 
breakpoint CALC 
G Begin execution Software emulation of real arithmetic 
€ Conti ti Compile and link time 66.4 sec 
ee eee Object code size 1024 bytes 
S Step to next statement Execution module size 30254 bytes 
P Proceed to next statement (does not Execution time 153.2 sec 
single-step functions or procedures Error 0.00000 
as S does) . 
D Display all breakpoints, macros, and BOB? eera creer arithmetic 61.2 
ablehawen ay. a ompile and link time .2 sec 
Ae a — Object code size 1024 bytes 
L list source statements * Execution module size 14206 bytes 
H Display execution history Execution time 1.9 sec 
: Enable or disable execution tracing Error 0.00000 
Ww Write the value of a variable MATRIX 
: Display help Software emulation of real arithmetic 
| Escape to the operating system Compile and link time 89.2 sec 
M Defi isti f Object code size 2048 bytes 
fee a Execution module size 28532 bytes 
Execution time (x10) 84.4 sec 
x Execute a macro 
N List names of parameters and 8087 coprocessor arithmetic 
local variables Compile and link time 83.5 sec 
E Switch to the stack frame of Object code size : 2048 bytes 
Scie tOUrne Execution module size 12484 bytes 
Execution time (x10) 2.6 sec 
Table 3. Sieve of Eratosthenes 
Compile and link time 63.0 sec 
Object code size 1024 bytes 
Execution module size 11696 bytes 
Execution time 7.3 SEC 
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total number of times each statement in 
each procedure was executed and the 
percentage of the execution counts in 
each procedure, followed by a listing of 
the statements executed with individual 
counts. With this tool, you can determine 
the hot spots of a program and work to 
make them more efficient. 

Bundled with the compiler are a series 
of utilities for the Pascal programmer: 
source code formatter, cross-reference 
program, and procedural cross-reference 
lister. The source code formatter accepts 
embedded control specifications in spe- 
cial comments. The cross-reference pro- 
gram shows a reference or declaration 
for every identifier. The procedural 
cross-reference program produces a list 
of procedure headings and an alphabeti- 
cal fan-in/fan-out listing of who calls 
each routine and what each routine calls. 
For projects of any size, this tool alone is 
invaluable. 

Source code for the empty program, 
CALC, and the Sieve of Eratosthenes 
were the same as those used for Marshal 
Pascal (see review of Marshal Pascal in 
this issue, pp.103-108) with minor 


Table 4. 


changes to accommodate language dif- 
ferences and to select the best compiler 
options. The compile and link times were 
measured on the same system specified 
in the Marshal Pascal review. One batch 
file was created to compile and link a 
benchmark in one step. Execution times 
for all programs, except those requiring 
emulation of real operations, were mea- 
sured on an IBM PC with an 8087 in- 
stalled. The others were run on a com- 
patible with a 4.77 MHz clock, 640K 
RAM, and a 28MB hard disk. The re- 
sults appear in Table 4. 

I recommend Pascal-2 if you need a 
compiler certified to level 1 of the ISO 
standard. This certification, plus the oth- 
er common Pascal compilers by Oregon 
Software, provide some insurance for 
large developments that may be ported 
across different processors. A bundled 
debugger and profiler, extensive checking 
options and library routines, and other 
development tools round out the package 
and make it attractive for the profession- 
al team or individual. [Fj 


By Mark Gayman 


Pascal-2 benchmarks 


| EVEN MORE POWER 
AND FLEXIBILITY 


BRIEF 2,0 


Users and industry press alike have 
unanimously proclaimed BRIEF as 
the best program editor available 
today. Now, the best gets better, 
with the release of BRIEF 2.0. 


Straight from the box, BRIEF offers ~ 


an exceptional range of features. 
Many users find that BRIEF is the 
only editor they'll ever need, with 
features like real, multi-level Undo, 
flexible windowing and unlimited 
file size. But BRIEF has tremendous 
hidden power in its exclusive macro 
language. With it, you can turn BRIEF 


ee 


541 Main St., Suite 410L 
; South Weymouth, MA 02190 
(617) 337-6963 


emmer’s Editor 
PUnaerware, Ine: 


Requires an IBM PC or compatible with 
at least 192K RAM. 


BRIEF is a trademark of UnderWare, Inc. 
Solution Systems is a trademark of Solution Systems. 


. into your own custom editor con- 


taining the commands and features 
you desire. It's fast and easy. 

Jerry Pournelle, columnist for BYTE 
magazine summed it all up by saying 
BRIEF is, “Recommended. If you 
need a general purpose PC program- 
ming editor, look no further.’ His 
point of view has been affirmed by 
rave reviews in C JOURNAL, 
COMPUTER LANGUAGE, DR. 
DOBB'S JOURNAL, DATA BASED 
ADVISOR, INFOWORLD AND 
PC MAGAZINE. 


ents 
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0 k regular 
. sic editing, 
Main Featur ntation with tutorials bee 
e 
«All new docume’ |. BRIEF M and configuration 
expressi0" , easy installa ro language) 
« Setup Progran  wiedge of a rations like Undo and 
Cas d for sophisticated sie 
4 eed ine 
gg Increased Tr ression Search with matching over li 
eens d regular expressions: column. 
Expanded I ter, line oF 
i boundaries. es, with marking by passim? delete 
Mere block oe iting (move Ouse eters). 
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° Automati 
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C language ze 


One user stated ‘‘BRIEF is one of 
the few pieces of software that I 
would dare call a masterpiece.” 
Order BRIEF now and find out why. 
BRIEF 2.0 is just $195. If you already 
own BRIEE call for upgrade 
information. 

TO ORDER CALL: 1-800-821-2492 
(in MA call 617-337-6963) ; 
As always, BRIEF comes with a 


30 day money-back satisfaction 
guarantee. ; 


e Full multi-level Undo 

e Windows 

e Edit many files at mae vases 
zee ite : sensitive indentation 


WRITE FASTER 
IN ANY LANGUAGE. 


If you develop software symbolically 
for any product based debug in the — 
onan Intel microcontroller same high-level language 
or microprocessor, includ- you wrote in without hav- 
ing the 80386, the unique ing to deal with machine 
debug hooks in the Intel or hexcode Which means 
languages will help get the 80.386 reads as 80.386, 
job done faster. not 50 62 DO C5. 

In fact, when used with Because the location 
Intel debuggers and emu- of both code and data are 
lators, Intel development _ easily specified with our 
languages can provide locator, it is easier for you 
more debug data than any to develop ROM-baséd 
other high-level language. firmware. 

Debug hooks let you Since Intel languages 


produce identical object 
code regardless of the host, 
you can write code at a 
PC running DOS, a VAX? 
VMS terminal, or an n Intel 
Development ga 

System. 


= members 
of the same 
design team can therefore 
choose the most effective 
combination of languages 
and systems to get the job 
done faster. 
Intel post-sales support 
can also help you get 
the job done faster. We in- 
vented the microprocessor. 
We know microprocessors 
_ and languages for Intel 
architectures better than 
— anyone else. 


When you buy an Intel 
language, you have access 
to our customer hotline. 
So if you ever have a ques- 
tion you can talk directly 
to a trained 


applications specialist who 
understands our products. 
And can give you the right 
answers. Faster. 

To order today, or get 
more information—includ- 


“ing a free catalog of our 


development tools—call 

toll-free 1-800-87-INTEL. 
The sooner you call, the 

faster youll get the job done. 


intel 


© 1986 Intel Corporation 
*VAX is a registered trademark of Digital Equipment Corporation. 
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Repertoire 
eid ice 


System requirements: IBM 
PC/XT/AT or compatible 

Price: $89 full source code 
version 

Available from: PMI, 4536 
S.E. 50th St., Portland, Ore. 
97206, (503) 777-8844 

Support: Telephone support 
or through BIX, MCI mail, 
CompuServe and telex 


Repertoire is an integrated collection of 
Modula-2 library modules designed to 
help the applications programmer pro- 
duce screen-oriented data base access 
programs. The libraries are available in 
object code only and full source code ver- 
sions for the Logitech and ITC 
Modula-2 compilers, each containing 33 
.LNK and .SYM modules. .DEF and 
.MOD modules are included with the full 
source code version. 

All modules are in .ARC archive for- 
mat, but PMI has included PKXARC, 
an archive extraction program, on each 
disk. The full source code version in- 
cludes a 332-page comb bound manual. 
The object-code-only version manual is 
supplied as a series of disk files the user 
prints out. 

No royalties are required for use of 
the modules in programs. The 33 mod- 
ules that comprise Repertoire contain 
about 250 routines providing basic capa- 
bilities of indexed file management, 
screen design and display, multiwindow 
editing, and natural language analysis. 
Each functionality is provided as a few 
high-level modules assembled from many 
lower-level modules. The programmer 
can, depending on his or her require- 
ments, utilize the high-level functions 
and rely on Repertoire to perform most 
of the application program’s work, or use 
the low-level functions to whatever de- 
gree required to achieve the desired 
result. 

The underlying concept behind almost 
all of Repertoire is the linked list. A pro- 
grammer need not know this to use the 
high-level functions, but if he or she digs 
into the source code, it becomes obvious. 
If you are used to B-tree-type data bases, 
you will find Repertoire’s approach con- 
fusing until the concepts used by Reper- 
toire’s designers become familiar. 

Repertoire provides a method for cre- 
ating and maintaining indexed files, but 
its indexed files are not ordinary ones. 
Repertoire’s indexed files are lists and 
each field within a record can be a list. 
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This approach is confusing for program- 
mers used to programming index- 
sequential file managers. 

Repertoire’s indexed file system allows 
complex free-form text data to be easily 
and economically stored in lists where 
each record is only as long as the string 
of data residing within it. Exceptions to 
handle varying amounts of data can be 
easily programmed. The weakness of 
Repertoire’s indexed file system becomes 
apparent when a programmer wants to 
define a record type in the main body of 
a program, retrieve a record, and refer to 
the fields of that record—customer.ad- 
dress.city, for example. Repertoire indi- 
vidually retrieves each field of a given 
record identified to the file system by its 
key. After the field is retrieved, it may 
be referred to as if it were defined as a 
record type. 

The indexed file system is a high-level 
group of modules assembled from lower 
level modules, which include a linked-list 
manager used for creating list-based ap- 
plications. This module is useful for or- 
ganizing data consisting of lists of lists. It 
frees the programmer from having to 
write code to create, search, and modify 
the data in the list. But, as in the case of 
the indexed file system, the linked list 
manager does not support structured 
data as records. 

Repertoire features a powerful screen- 
handling system with many advantages 
over other Modula-2 screen handlers. 
Repertoire windows, called frames, con- 
sist of a command area and a frame text 
area. Frames are created using an 
ASCII text editor and compiled with 
Repertoire’s screen compiler. The result- 
ing file is used by the application pro- 
gram to display screens and interact with 
the user. 

The command area contains informa- 
tion used by Repertoire to process the 
frame, including field commands, next 
and parent frames, help text, and infor- 
mation about Kaw the frame is dis- 
played—colors, box borders, window co- 
ordinates, etc. Field commands allow a 
programmer to specify the name and 
type of the field, whether or not it is a 
required field, and text for prompt and 
help messages. The next and parent 
frames describe the path of Repertoire 
frames that normally precede and follow 
the current frame; Repertoire thus knows 
which frame to display when a user com- 
pletes a data entry screen or backs up to 
a previous screen. In addition, Repertoire 
has a special field type programmed to 
automatically branch to another path of 
screens when that field is selected. 

The layout of the window is described 
in the frame text area using static text 
and field delimiters placed in the actual 
rows and columns where the data will 
appear. A one-to-one sequential corre- 
spondence of fields is defined in the com- 
mand area and placed in the frame text 


area. Normally all of the screens for a 
program are placed in a single file and 
compiled with the screen compiler, but a 
program can have multiple screen files. 
The high-level screen display modules 
can be utilized to automatically handle 
all interaction with the user and deposit 
information into a Repertoire linked list 
for future processing. The only procedur- 
al code required in the main body of a 
program is a loop around a Repertoire 
input procedure. At a higher level, Rep- 
ertoire creates vaporware in a manner 
similar to Dan Bricklin’s Demo Program 
but without the transparent overlay ca- 
pabilities. At a lower level, Repertoire 
routines can be used in concert with 
user-written procedures to display a 
frame and validate and store its input. 
Repertoire includes a simple text edi- 
tor module used within a screen display 
frame window. It is not a full-function 
editor; it allows application programs to 
provide the user with the capability of 
entering and formatting textual data. 
Another of Repertoire’s important fea- 
tures is its ability to analyze natural lan- 
guage, which allows programmers to pro- 
cess data base queries in English. The 
analysis routines can be embedded in 
screen display frames so that if a user 
enters certain words or phrases, the 
screen display system will branch to an 
appropriate path of frames. The natural 
language analysis system constructs com- 
plex Boolean searches of indexed file 
data by examining certain fields and ap- 


plying the comparison criteria provided ~~ 


to the language analysis routines. 
Repertoire includes several miscella- 
neous routines used in the major subsys- 
tems as well as by themselves. These rou- 
tines identify the display hardware on 
the PC running the program and rou- 
tines to access the PC’s speaker. An ex- 
tended file/subdirectory module and sev- 
eral string editing and input/output 
routines provide more functionality than 
the standard Modula-2 library modules. 
Repertoire is primarily useful to appli- 
cations programmers developing large 
screen-oriented text data base programs. 
It features tight integration of all mod- 
ules in the library, which allows systems 
to be constructed quickly using reusable 
components that require minimum cod- 
ing. But the modules are so tightly inter- 
twined that it is difficult to import one 
module without having it link its related 
modules. A “hello, world” .EXE file that 
imported all of the high-level indexed 
file, screen display, editor, and natural 
language analysis subsystems totaled 
about 172K. . 
Programmers who purchase the full 
source code version of the library will be 
able to modify individual modules to suit 


their needs, but I feel the modules should 
have been provided at a more basic level 
of functionality, which would allow the 
user to incorporate only the desired func- 
tions. PMI intends to provide this capa- 
bility, not by supplying more modules. 
but by making available a program that 
will strip out unused routines from 
modules. 

The indexed file system theoretically 
accommodates a maximum of 65,535 rec 
ords. In practice, because the file index is 
kept in memory, 10,000 to 15,000 rec 
ords is the most that can fit into a 640K 
PC. PMI has recently released an ex- 
tended memory module that will help 
overcome this memory limit. Although 
the index is kept in memory, Repertoire 
will automatically rebuild the index from 
disk data if the system should crash 
while the index is in use. Programmers 
who prefer a more conventional file man- 
ager over the list-oriented Repertoire file 
manager should be aware that PMI of- 
fers a set of dBASE III compatible 
modules. 

The display system is not blazingly 
fast but is adequate for most business 
uses. When a program using a file of dis- 
play screens is loaded, it appears that all 
of the screens in the file are scanned 


System requirements: IBM 
PC/XT/AT or compatible, 
Turbo Pascal v.3.0, 256K 
RAM, one floppy drive, 
hard disk recommended 

Price: $75, $125 with 
source code 

Available from: TurboPower 
Software, 3109 Scotts 
Valley Dr., Ste. 122, Scotts 
Valley; Calif. 95066, 

(800) 538-8157, ext. 830 
(in Calif.), (800) 672-3470, 
ext. 830 (elsewhere) 

Support: Telephone support 
(408) 438-8608 


The success of a software package can 
often be measured by the number of add- 
on or enhancement programs developed 
for it by other companies. Indeed, hun- 
dreds of programs are available to en- 
hance or Support big-name programs 
such as Lotus 1-2-3, dBASE III, and 
AutoCAD. With over 500,000 copies 
sold, Borland International’s Turbo Pas- 
cal is no exception. 

Turbo Optimizer from TurboPower 
Software is a set of programs consisting 


Turbo Optimizer 


first. If you have a lot of screens, this 
will slow down the initialization of your 
programs. The prompt/help fields and 
forward/backward frame chaining capa- 
bilities, along with the editor module, 
make it simple to construct complex 
data-entry programs. The natural lan- 
guage analysis module is very helpful for 
constructing text-search algorithms on 
the fly. PMI has indicated that future 
plans involve making Repertoire into a 
Microsoft Windows toolkit. 

The documentation for Repertoire is 
very useful, although more examples of 
programs that use Repertoire would be 
helpful. 

As a longtime Modula-2 fan, I have 
drooled over the many competing librar- 
ies available from C vendors. PMI ap- 
pears to be the leader in supporting 
Modula-2 with well-crafted, well- 
documented library modules. It is unfor- 
tunate that these modules are so tightly 
integrated that you get other components 
when you only want one module. PMI is 
actively working on solutions, so future 
releases of Repertoire should be more 
Modula (pun intended). | 


By Warren Keuffel 


The author wishes to thank Bill 
Schaller for his assistance in evaluat- 
ing Repertoire. 


of Turbo Library Compactor (TLC), 
Turbo Object Optimizer (TOPT), and 
Turbo Object Librarian (TOL). These 
programs optimize compiled (.COM) 
Turbo Pascal programs. 

TLC removes unused object code from 
compiled Turbo Pascal programs. Every 
one of these programs has an overhead of 
approximately 11.5K because the entire 
run-time library is included during com- 
pilation. For instance; if your program 
uses only integer math, all the floating- 
point routines will be included with the 
program. TLC simulates the execution of 
your program and notes any code not 
used during execution. It then removes 
these code fragments, thus reducing the 
size of your program. 

TLC also finds and removes unused 
code from included files of often-used 
routines, so TLC is not limited to remov- 
ing unused code from the run-time li- 
brary. If you are using only half of a 
large include file of screen-handling rou- 
tines, TLC removes the unused code 
from the output file. 

Some programs are not easily com- 
pacted, and TLC has options for dealing 
with special cases. TLC makes certain 
assumptions distinguishing between code 
and data in a Turbo Pascal program. If 
you have-code that does not agree with 
these assumptions, TLC may not work 


COMBINE THE 
RAW POWER OF FORTH 
WITH THE CONVENIENCE 
OF CONVENTIONAL LANGUAGES 


HS 


FORTH 


Now you can compile even large pro- 
grams in the blink of an eye. If you 
don’t need to compile the huge fast 
programs we handie so well, use the 
metacompiler to spin off compact 
ones — as small as a few hundred 
bytes for simple threaded utilities — 
as small as 2 kbytes for a full Forth 
execution core. HS/FORTH is the 
best base from which to spin off either 
direct or indirect threaded systems, 
small or large, or anything else you 
might invent. This is absolutely the 
most flexible Forth system available, 
at any price, with no expensive extras 
you'll need to buy later. Distribute 
metacompiled tools, or turnkeyed 
applications royalty free. 


Although HS/FORTH is unmatched 
for language experimentation and 
development, remember that we 
wrote it to be a top notch application 
development system. Your appli- 
cation will have all of DOS at its dis- 
posal, commands, other programs, 
functions, everything! 1/O is easier 
than in Pascal or Basic, but much 
more powerful — whether you need 
ae formatting, or random ac- 
cess. Send display output through 
DOS, BIOS, or direct to video 
memory. Windows organize both text 
and graphics display. Math facilities 
include both software and hardware 
floating point plus an 18 digit integer 
(finance) extension and fast arrays for 
all data types. The hardware floating 
point covers the full range of trig, 
hyper and transcendental math in- 
cluding complex. Forth gives you 
total control of your computer, but 
only HS/FORTH gives you imple- 
mented functionality so you aren't left 
hanging with “great possibilities” 
(and lots of work!) 

We can’t possibly cover everything in 
this ad, so please call or write and ask 
for our brochure. We'll also be happy 
to answer any questions. 
HS/FORTH complete system: 
Forth: Text & Reference (500pg) 
Kelly&Spies, Prentice Hall 
HS/FORTH: Tutorial & Reference 
Kelly&Callahan (500pg) 
HS/FORTH Glossary 
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Introducing 


DATABASE 


Programming & Design 


the first magazine to focus on practical, technical 


Solutions for DBMS specialists 


—from the publishers of Al Expert, Computer Language, and Unix Review 


Now, for the first time, MIS/DP managers, database administrators, designers, ana- 
lysts and other technical managers will have one information source that concentrates 
on the technical side of database management systems. Written for technical special- 
ists, DATABASE PROGRAMMING & DESIGN is geared to answer your most 
pressing design and programming questions. In technical depth. 


Our editors know that DBMS people face big 
challenges. How to meet, design and manage 
corporate information requirements. How to 
cut down on the applications backlog. How to 
increase productivity of DP systems and end 
users. Designing custom applications. Evalu- 
ating, choosing and using software products 
specific to DBMS needs. 


DATABASE PROGRAMMING & DE- 
SIGN, every month, will help you meet these 
technical challenges. By concentrating on 
hard, usable DBMS-specific information you 
need, our editors will save you hours and 
hours of time from trial-and-error mistakes. 
They'll give you the help you need with your 
management and technical problems.. 


Every monthly issue will bring you 
practical, helpful topics like these: 


e DB2 support tools e distributed query pro- 
cessing elocation transparency ¢ operating 
system independence e normalization econ- 
ceptual data modeling ¢ structure and data in- 
tegrity @ security barriers © automated design 
tools edata migration e productivity tools 
e gateways eSQL dialects e real-time moni- 
toring e data recovery e end-user interfaces 

And every month you will have these special 


columns written by technically competent edi- 
tors and contributors: 


e Database Design—tips and techniques for 
. designing complex databases on medium 


and large systems—both theory and practi- 
cal implementations of design methodology. 


Micro Interface—a detailed evaluation of 
the new development approaches and prod- 
ucts that have migrated up and down be- 
tween large systems and microcomputers. 
How to port applications either way. 


e Shoptalk—offering practical solutions to 
problems commonly faced by database 
administrators. 


eFor Managers Only—lively discussions for 
high level MIS managers on subjects like 
training, increasing and measuring produc- 
tivity, and corporate strategies. 


e Product Watch—objective reviews of new 
DBMS products from mainframe database 
managers to development software to pro- 
ductivity tools. 


© Database Library—reviews of new books 

and summaries of technical articles from as- 
sociation journals, newsletters and other 
magazines. 


DATABASE PROGRAMMING & DE- 
SIGN is guaranteed to help you solve your 
technical database problems and increase sys- 
tem performance.- 


Because DATABASE PROGRAMMING & 
DESIGN is edited strictly for professionals, 
the press run for the Premier Issue will be 
very limited. To assure receiving your FREE 
copy, please return the coupon today. 
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readers of Ail Expert, Computer 
Language and Unix Review 
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ea FREE Premier Issue. 


ea special Charter Subscriber rate, should 
you decide to continue, of just $37 for a full 
year’s subscription. That’s $20 off the regu- 
lar $57 rate. 


©a guarantee that if the Premier Issue does 
not live up to your expectations you may 
cancel and owe nothing. 


Send to: DATABASE PROGRAMMING & 


DESIGN, P.O. Box 10716, Des Moines, IA 
50309 
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correctly. Code produced by the 
INLINE statement, for example, may 
cause problems. TLC allows you to de- 
scribe such cases to the optimizer so they 
will be treated properly. Other options 
controlling the amount of optimization 
include one that allows the creation of 
extremely small (less than 1K) pro- 
grams. This option is especially useful for 
small utility programs. 

How much can TLC compact your 
program? In compacting the run-time 
library, the most TLC can remove is 
about 11K, most of the program. Of the 
examples included on the Turbo Opti- 
mizer diskette, the amount of code re- 
moved ranged from 56% to 99%. Howev- 
er, the largest program was only 15K, 
and most programs were about 11.5K. 

I was curious to see how TLC per- 
formed with some real-world applica- 
tions, so I dug out some Turbo Pascal 
sources and ran TLC on them. The re- 
sults are in Table 1. CALC.COM is the 
MicroCalc spreadsheet included with 
Turbo Pascal. SIM85 is an 8085 simula- 
tor I wrote, and ASM85.COM is a com- 
panion 8085 assembler written by a 
friend. QEDIT.COM is a nice public do- 
main text editor. INLINER.COM is a 
program that converts 8086 assembly 
language to Turbo Pascal INLINE 
statements. 

The biggest limitation of TLC is that 
it cannot be used on programs employing 
overlays or on programs using Turbo’s 
CHAIN or EXECUTE procedures. This 
is true of all the programs supplied with 
Turbo Optimizer. 

The second part of Turbo Optimizer is 
TOPT. While TLC optimizes for pro- 
gram size, TOPT optimizes for speed. 
TOPT performs what is often called 
peephole optimization. Simulating the 
execution of the program, it scans the 
object code looking for instructions that 
can be eliminated or replaced with small- 
er, faster ones. It also looks for often- 
used sequences of instructions and at- 
tempts to replace them with more 
efficient ones. 

Although this generally results in-a 
smaller program, the main advantage is 
a decrease in execution time. TOPT has 
fewer options than TLC. The available 
options allow for relocation map genera- 
tion, reading code pattern files (for deal- 
ing with INLINE code), and generation 
of optimization statistics. Running TOPT 
on short programs using different Pascal 
constructs allows you to find out where 
Turbo Pascal generates reasonably good 
code and not-so-good code. 

The increase in program speed with 
TOPT depends on the application. Sam- 
ple programs included with TOPT show 
speed increases ranging from 15%-31% 
after optimization. I was able to devise 
programs that ran from 2% faster (a fast 
Fourier transform program) to over 30% 
faster (empty integer loops). I would es- 


timate that TOPT will speed up most 
compute-bound programs by an average 
of 15%. The manual for Turbo Optimiz- 
er offers useful tips to make Turbo Pas- 
cal programs smaller and faster. 

The final program included with 
Turbo Optimizer is TOL. TOL is not an 
optimization tool per se, but for some it 
will. prove to be the most valuable part of 
the Turbo Optimizer package. TOL al- 
lows you to extract object code from a 
compiled Turbo Pascal program and 
place it in a library. When you wish to 
use this code again, TOL generates an 
external subprogram and a correspond- 
ing include file. This has several advan- 
tages over regular include files. 

First, commonly used procedures and 
functions needn’t be recompiled over and 
over. Once the code has been entered 
into the library, it may be used in future 
programs without recompiling it. Second, 
TOL allows you to distribute Turbo Pas- 
cal code modules without releasing the 
source code. Previously, this was possible 
only when using assembler. The library 
files produced by TOL are in standard 
LU format, thus allowing the use of the 
public domain program LU.COM to ex- 
tract library routines. 

TOL is menu-driven and includes sev- 
eral options. Extractor is used to extract 
code from a compiled program and store 
it in a library. Builder takes the extractor 
code from the library and incorporates it 
into an external subprogram. The output 
from the builder consists of a binary file 
(the actual code) and an include file con- 
taining the necessary Pascal declarations, 
much like the GRAPH.BIN and 
GRAPH.P files found on the Turbo Pas- 
cal disk. Documentor generates a listing 
of library contents, and Library Mainte- 
nance deletes modules from a library and 
packs the library to keep it as small as 
possible. 

TOL has some restrictions. Routines 
to be extracted must not refer to global 
variables, call functions, or procedures 
outside of their own scope. This restric- 
tion encourages modularity, and most 
routines can be modified to get around it. 

Another restriction is that modules 
created by TOL may not be used with 
different versions of the Turbo Pascal 
compiler. For example, if you use TOL 


Program results with TLC 


Size 
Program before 
CALC.COM 26,382 
SIM85.COM 30,935 
ASM85.COM 18,54) 
QEDIT.COM 33,237 
INLINER.COM 37,860 


Average code removed: 


Table 1. 


to create an external subprogram for the 
8087 version of Turbo, that subprogram 
may not be used with any other version 
because the run-time library routines re- 
side at different addresses in each ver- 
sion. Creating modules that are usable 
with any version would mean prohibiting 
calls to the run-time library, which 
would limit the usefulness of TOL. Mak- 
ing modules compiler-dependent is a less- 
er restriction. 

The Turbo Optimizer manual is well 
written and organized. Each program is 
explained thoroughly, and adequate ex- 
amples are included. An index is also in- 
cluded, as well as a brief description of 
other programs available from Turbo- 
Power Software. The Turbo Pascal 
source code (over 600K worth) is also 
available for an additional charge. 

In addition to the programs mentioned 
here, Turbo Optimizer includes utilities 
allowing its use with other TurboPower 
programs such as Turbo Extender and 
TDebugPlus. A number of example pro- 
grams are supplied, including a good set 
of routines for trapping DOS-critical 
errors in your own programs. 

TurboPower Software guarantees the 
software itself, not just the diskettes. If 
you find a bug they’ll fix it. If they can’t 
fix it they’ll give you your money back. 
Support is available via a support line or 
on CompuServe. 

Turbo Optimizer is not for everyone. 
As mentioned, if your application uses 
overlays, Turbo Optimizer will not work. 
If your program is interactive in nature 
or disk intensive, you will probably see 
little speed increase. However, memory- 
resident programs written in Turbo Pas- 
cal and small utilities will benefit 
greatly. 

A little extra effort in your program 
design combined with Turbo Optimizer 
may save you from having to resort to 
assembly language in some cases. The 
ability to create small programs opens up 
many possibilities for Turbo Pascal. 

I saw a sign on the office wall of a 
software engineer that read: “Software 
Designed Here. Small, Fast, Cheap. Pick 
Any Two.” Turbo Optimizer may let 
Turbo Pascal programmers have all 


three. «| 


By Douglas Hall 
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TURBOsmith 


System requirements: IBM 
PC/XT/AT or compatible, 
512K RAM, two disk 
drives, Borland 
International’s Turbo 
Pascal v. 3.x, not copy 
protected 

Price: $69 

Available from: Visual 
Age, 642 N. Larchmont 
Blvd., Los Angeles, Calif. 
90004, (213) 534-4202 

Support: Telephone support 


TURBOsmith is a multiwindow debug- 
ging environment for Borland Interna- 
tional’s Turbo Pascal, including BCD 
versions. TURBOsmith provides debug- 
ging facilities that appeal to beginner 
and advanced Turbo Pascal 
programmers. 

To install TURBOsmith, simply copy 
the files to the same directory as 
TURBO.COM. To use TURBOsmith, 
invoke its main program, TSM.EXE, 
which calls Turbo Pascal’s familiar edit/ 
compile environment with one additional 
option: (T)race. The Turbo Pascal envi- 
ronment works as usual; when you want 


to debug your program, TURBOsmith 
invokes the compiler if necessary, then 
presents its debugging windows. 

The TURBOsmith screen is divided in 
half. The upper half contains the source 
code window with the first executable 
source line in reverse video. The lower 
half contains the variable view, where 
variable names and values are displayed 
in the order declared in your source code. 
You can move between these windows, 
and each window can contain stacked 
windows with other features. By pressing 
the space bar you can move between the 
TURBOsmith environment and the 
screen display of your program. Your 
screen display reappears every time you 
execute a new source line (a feature that 
can be toggled off). 

The source code window allows for 
single stepping through code by pressing 
the grey + key and full-speed execution 
with the Alt X key. You can view other 
source lines by pressing the up or down 
arrow key or jumping directly to the line 
number. Pressing Control Home returns 
you to the current line, which can be 
centered in the window. 

Up to 50 breakpoints can be set with 
TURBOsmith. Each breakpoint halts the 
program running at full speed. You can 
also declare your current location as the 
before image, run at full speed until the 
breakpoint is reached, and then compare 


variable values at the before and break- 
point locations. Breakpoints can be set in 
procedures, and these breakpoints can be 
ignored when procedures are called from 
the mainline code. 

TURBOsmith also offers a machine 
code view, which displays the assembler 
version of the compiled code and allows 
changes to the general and segment reg- 
isters. The machine code view also allows 
more sophisticated breakpoints. A pass- 
point interrupts processing when the 
source code has been executed a user- 
definable number of times (between two 
and 65,534) and can be used to stop 
within a loop. Machine code view counts 
the number of times a particular piece of 
code was executed. 

A stop-on-compare (equal or not 
equal) breakpoint can be set if the com- 
pare value is no more than 10 bytes long 
and the variable address is known. The 
variable address can be found by single 
stepping through the machine code view 
in the bottom half of the screen and the 
source code view in the top half for pro- 
grammers with a fair understanding of 
assembler. (This feature is best ignored 
for those not acquainted with machine 
code.) 

The stop-on-compare literally stops 
your program—variables and memory lo- 
cations can be viewed, but the program 
cannot proceed. I had to boot the system 


FORTRAN PROGRAMMERS 


Looking for the right PC FORTRAN language system? If you’re serious 
about your FORTRAN programming then you should be using F77L - 
LAHEY FORTRAN. 


“Lahey’s F77L FORTRAN is the compiler of choice. It’s definitely a 
‘Programmers FORTRAN,’ with features to aid both the casual and the 
professional programmer... F77L compiled the five files in a total of 12 
minutes, which was 4.times as fast as MS FORTRAN and an astounding 6 
times as fast as Pro FORTRAN” - PC Magazine ws 


Compare the features and performance of other PC FORTRANs with F77L 
and you will find that F77L is clearly the superior product. 


Full Fortran 77 Standard (F77L is not a subset) ¢ 
Popular Extensions for easy porting of mini ¢ 
and mainframe applications 

COMPLEX:« 16, LOGICAL«#1 and INTEGER« 2 
Recursion - allocates local variables on 

the stack 

IEEE - Standard Floating Point 

Long variable names - 31 characters 

IMPLICIT NONE 


Fast Compile - Increases productivity 
Source On Line Debugger (Advanced 
features without recompiling) 

Arrays and Commons greater than 64K 
Clear and Precise English Diagnostics 
Compatibility with Popular 3rd Party 
Software (i.e. Lattice C) 

Easy to use manual 

Technical Support from LCS 


0 NEW FEATURE - NAMELIST 


F77L - THE PROGRAMMER’S FORTRAN 


; $477.00 U.S. 
System Requirements: MS-DOS or PC-DOS, 256K, math coprocessor (8087/80287) 


FOR MORE INFORMATION: (702) 831-2500 

International Dealers: 

England: Grey Matter Ltd., Tel: (0364) 53499 
Denmark: Ravenholm Computing, Tel: (02) 887249 
Australia: Computer Transitions, Tel: (03) 537-2786 
Japan: Microsoftware, Inc., Tel: (03) 813-8222 


SERVING THE FORTRAN COMMUNITY SINCE 1967 


MS-DOS & MS FORTRAN are trademarks of Microsoft Corporation.Pro FORTRAN refers to Professional FORTRAN a trademark of 
International Business Machines. 


Lahey Computer Systems, Inc. 
P.O.Box 6091 

Incline Village, NV 89450 
U.S.A. 


Editor’s Choice 
- PC Magazine 


CIRCLE 41 ON READER SERVICE CARD 


after my match was found. The manual 
also warns that execution in stop- 
on-compare mode is approximately 200 
times slower than normal, and heavy use 
of this mode is not recommended. 

Within the machine code view, source 
lines can be set with a tag so all similarly 
tagged lines are set or reset as break- 
points with one keystroke. The variable 
view displays and changes variable val- 
ues. With the source code window on the 
top half of the screen and variable view 
below, you can watch variable values 
change as your source code is executed. 
Values can be changed by overtyping 
them or, in the case of enumerated 
(scalar) types, by scrolling through other 
possible values. Variables not yet initia- 
lized are shown as “invalid value.” 

TURBOsmith handles record struc- 
tures, pointers to record types, and nest- 
ed records. It also handles arrays, but 
scrolling through each element is neces- 
sary—you cannot directly access a par- 
ticular array element. 

One drawback of TURBOsmith is that 
the variables to be viewed cannot be se- 
lected; all variables defined are either 
listed in order by definition or alphabeti- 
cally. If your ABC and XYZ fields are 
to be watched, it is best to define one 
after the other in your source or rename 
one of them to ABC2 and restore the 
original name once debugging is com- 
plete. Some kind of variable selection 
would make the debugging process sig- 
nificantly faster. 

TURBOsmith also supports overlay 
tracing of source and variables within 
overlays and include files. However, once 
procedures or functions are entered a 
new variable view window must be 
opened to access the values and closed 
when the procedure is completed. (If no 
variable views are desired, no special 
window manipulation is necessary.) 
Automatic windowing is promised in the 
next release. 

Both upper- and lower-screen windows 
can be overlaid with other windows, thus 
allowing any combination of two views, 
one on the top half of the screen and one 


BRIEF 
eu a 


System requirements: IBM 
PC/AT or compatible, 192K 
RAM, one disk drive 

Price: $195 

Available from: Solution 

Systems, 541 Main St., Ste. 
410, S. Weymouth, Mass. 
02190, (617) 337-6963, 
(800) 821-2492 


on the bottom. For example, the machine 
code view can be stacked on top of the 
variable view to watch source code and 
assembler code execute in sync. 

Another option is the hex/ASCII 
(memory) view, which transfers changes 
directly to memory in either hex or 
ASCII mode if the segment:offset is 
known. With the AUTODUMP option, 
memory view can be synchronized with 
the machine code view, and the area of 
memory addressed in each assembler 
source code statement is automatically 
displayed. 

TURBOsmith has a number of other 
useful features: the stack can be read, in- 
line code changed to the more familiar 
assembler format, and memory scanned 
for the presence of strings. The product 
makes good use of colors, and readability 
on monochrome monitors does not suffer. 
The program will automatically single 
step for you, and the process can be in- 
terrupted at any time. 

TURBOsmith offers sophisticated de- 
bugging with its assembler/editor. You 
can generate hexadecimal machine code 
for use as inline statements or add up to 
10 patches to your object code. The 
patches can be applied to your existing 
object code or added to your code. The 
added instructions are jumped to and ex 
ecuted, and control returns to the main- 
line code. However, my limited knowl- 
edge of assembler prevented me from 
adequately testing these features. 

TURBOsmith has some weaknesses. 
The number of code modifications and 
variables the product allows forces a re- 
compile each time you run a trace ses- 
sion. This process is tedious for “what if” 
debugging of long programs. 

TURBOsmith is dependent on the ma- 
chine code view to perform tasks begin- 
ning Turbo Pascal programmers would 
rather do from the source code view. 
Machine code can be confusing to begin- 
ners, and a sophisticated product such as 
TURBOsmith shoild be more useful to 
those without assembler background. 

For example, to avoid single stepping 
debugged procedure code, you must use 
the machine code view. However, single 
stepping through a number of PUSH 
statements can be more difficult than 


Support: Free telephone 
support with purchase price, 
30-day money-back 
guarantee 


BRIEF is what you might call a two- 
faced editor. Not, of course, because it’s 
double-dealing or untrustworthy, but be- 
cause BRIEF possesses two different and 
distinct aspects. Right out of the box it’s 
a versatile, extremely powerful editor 


stepping through procedure source code, 
especially at TURBOsmith’s speed. 
(Breakpoints could be set after the proce- 
dure call and full-speed processing used 
when in the procedure itself, but this is 
not an optimal solution.) 

TURBOsmith comes with a keyboard 
macro facility that is good for the Turbo 
Pascal session but cannot be saved on 
disk. Its operation is quirky at best—I 
could never successfully get the macro to 
start recording keystrokes when I want- 
ed. The feature would be welcome, espe- 
cially for changing the window config- 
uration on entry, but trying to use 
TURBOsmith macros was more trouble 
than it was worth. 

In TURBOsmith the cursor is slow. 
Moving within the source code view to 
open new windows took too much time. 

Overall, TURBOsmith works as the 
manual describes. It takes time to get 
used to the program, and more features 
should be available from the source code 
window for easier use. Even so, the pro- 
cesses are straightforward once you be- 
come accustomed to the program. 

TURBOsmith comes on one disk, ac- 
companied by a 200-page manual with a 
good index and a quick reference card. 

The documentation includes a short 
tutorial, and a sample source program is 
on the disk. The documentation is thor- 
ough and whimsical in spots: “TURBO- 
smith can track immense programs up to 
9,362 lines total in any one source file or 


include file. Up to seven statements sepa- _. ~~ 


rated by semicolons can coreside on the 
same line, above that, TURBOsmith 
drops its marbles.” The authors explain 
the features of the product and the rea- 
sons behind their use and give well- 
thought-out examples. , 

Update: A new release, v. 2.1, is ex- 
pected by the time this review appears. 
Visual Age claims the new version will 
add an expression evaluator (when you 
type in a legal Pascal expression, 
TURBOsmith will use current values of 
variables to calculate the result), the 
ability to trace into .CHN files, and the 
ability to trace a compiled .COM file. | 


By Jim Powell 


that handles most any programming task 
with aplomb. BRIEF also includes a 
macro programming language that lets 
you write your own editing functionse— 
functions that may be as complex as 
some programming projects you’ve done 
in any “real” language. 

BRIEF has been around for almost 
three years and was reviewed in “Power 
tools for programmers: 12 editors for the 
IBM PC” (Software Review, COM- 
PUTER LANGUAGE, June 1986, pp. 
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97-129). Version 2.0, BRIEF’s first ma- 
jor upgrade, is primarily characterized 
by many small enhancements. My favor- 
ite improvements are the addition of line 
and rectangle blocks, added power in 
search and replace, and increased speed 
in some areas. I predict that most new 
users will find the rewritten documenta- 
tion a treat. Those who refused to try 
BRIEF because of the border it puts 
around the screen will appreciate the op- 
tion to reclaim that lost area for their 
text. 

The programmer who just wants to 
use an editor, not fiddle with it, will find 
BRIEF easier to install than before, 
thanks to the new SETUP program. 
Configuration is still accomplished, as in 
previous versions, by setting environment 
variables and writing custom macros. 
However, now you can choose your de- 
sired options from menus, and SETUP 
will do the rest. 

Before installing BRIEF, SETUP be- 
gins by suggesting directory names for 
the various files, allowing you to change 
them if you wish, and then copying the 
files from the master disks. SETUP then 
allows you to choose defaults for many of 
BRIEF’s options, including screen colors, 
cursor size, case sensitivity of searches, 
use of tab characters or spaces, keyboard 
auto-repeat rate, and backup file han- 
dling. Some options—tab settings, inden- 
tation method, word wrap—can be set 
differently for the various file extensions. 

SETUP will modify your config.sys 
and autoexec.bat files, making backups 
of your old ones, and create custom ma- 
cros based on your desired configuration. 
All you have to do is reboot, and BRIEF 
is ready to run. The only problem I 
found with the configuration process oc- 
curs with programs that don’t handle the 
DOS environment correctly. Unless you 
specifically override it, BRIEF increases 
your default environment size, causing a 
small number of poorly written programs 
to fail the next time you run them. 

BRIEF’s design encourages you to as- 
sign commands to keys wherever possi- 
ble, and, in fact, has no command mode. 
‘You can execute named commands by 
using the execute command key, F10, 
which prompts you for a command. 
When a command is complete, the cur- 
sor always returns to the text. 

Thus the problem of mistakenly typing 
commands into the text or text into the 
command line is avoided. With v. 2.0, 
commands accept parameters directly 
from the command line, as in tabs 4 7, 
rather than prompting for them 
separately. 

Keyboard customization is automated 
in v. 2.0, so you can choose the keys to 
use for 101 BRIEF commands by run- 
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ning a special keys macro. 

I found this ability to be a mixed 
blessing. Keys is slow and provides no 
quick way to browse through the com- 
mands. The method of operation is not 
intuitive and offers few ways to undo or 
cancel a mistake. It doesn’t warn you 
when you redefine a key that has another 
meaning, a fault that allowed me to re- 
define F10 as end_of_line, supplanting 
F10’s original function of executing 
named macros. This left me in the amus- 
ing dilemma of being unable to use the 
keys macro to correct the problem be- 
cause I needed the original definition of 
F10 to run keys! 

Some of BRIEF’s commands are too 
complex for the simple assignment ap- 
proach of keys. I redefined the enter key 
to insert a blank line below the current 
line, which worked fine everywhere ex- 
cept in C programs. BRIEF’s indenting 
option, which I had activated for .C files, 
has key definitions hard-coded into it 
that aren’t affected by assignments made 
by keys. 

Version 2.0 has three new types of 
marked blocks—line, rectangle, and non- 
inclusive—in addition to the original 
stream blocks. The noninclusive block is 
like the stream block except the last 
marked character is not included in the 
block. Line blocks are a valuable addi- 
tion since most programming languages 
are line-oriented. The rectangle blocks 
are not entirely successful; their slow 
speed, in particular, makes them seem 
like an add-on feature. They also don’t 
work quite right if you move or copy a 
rectangle block that contains blank lines. 
Inserting such a block in another location 
treats the blank lines as if they were 
filled with nulls, instead of pushing the 
existing text to the right and filling the 
space with blanks. 

The biggest speed improvement in 
y. 2.0 comes in searching for wild cards 
and regular expressions, with speeds five 
to 10 times faster than earlier versions. 
BRIEF’s regular expressions are even 
more useful than before, with additional 
nesting of expressions and matching 
across line boundaries. Although straight 
text searches are still a little slow, 
BRIEF’s combination of speed and pow- 
er in searching puts it near the top of the 
class in this category. 

BRIEF’s other significant speedup is 
in saving files to disk, which is two to 
three times faster in the new version. 
Starting up BRIEF takes somewhat 
longer than before, mostly a result of 
changes in the processing of key 
definitions. 

You can edit as many files as you 
want, with the size of each limited only 
by disk capacity. This can be a great re- 
lief if you’re used to working within the 
confines of a memory-limited editor, es- 
pecially if you also have an affinity for 
memory-resident programs. When buf- 


fering occurs there is a slight speed pen- 
alty, but BRIEF’s virtual memory is 
much faster than that of any of its 
competitors. 

BRIEF allows more on-screen win- 
dows than any sane person will ever use, 
which is probably just about the right 
number an editor should allow. While 
other editors limit you in various ways, 
BRIEF lets you devise any configuration. 

As I mentioned earlier, those who 
don’t like the borders that BRIEF puts 
around the screen can now remove them. 
With the borders removed BRIEF relies 
on different background colors to differ- 
entiate between multiple windows, a 
scheme that doesn’t work on mono- 
chrome monitors. 

Solution Systems suggests solving this 
problem by writing a macro that turns 
the borders back on whenever multiple 
windows are active. My feeling is that by 
not providing such a macro in the SET- 
UP program, this option is not fully im- 
plemented. Turning off the borders also 
eliminates the on-screen display of file 
names; their absence makes me uncom- 
fortable when editing multiple files. 

BRIEF still has its famous undo com- 
mand, which lets you move backward 
through any kind of editing changes and 
cursor movements you have made ina 
file. This can be handy, for example, if 
you reach for the down arrow but press 
the end key instead, which takes you to 
the end of the line. Pressing undo will 


take you directly back to where you ~~~ 


came from, usually saving a lot of 
keystrokes. 

When searching for occurrences of a 
string, you can use undo to reexamine 
strings you’ve already seen and 
search_again to resume the search. More 
conventionally, undo can be used to cor- 
rect editing mistakes—from a single 
character, to a large deleted block, to a 
global search and replace. 

For C programmers, BRIEF offers 
smart indenting and shorthand creation 
of templates for common structures. I 
was especially pleased to see that the in- 
denting style can be customized to taste. 
Programming can be much more produc- 
tive when you don’t have to spend time 
formatting code. 

BRIEF is known for its ability to in- 
voke your compiler from within the edi- 


_tor, automatically compiling the current 


file and finding the error locations for 
you on the screen. In previous versions, if 
you used anything other than a select 
group of five compilers, you had to do 
some extensive customization to get this 
feature to work. In v. 2.0, the compiler 
support has been expanded to include 
many of the major Pascal, COBOL, 
FORTRAN, BASIC, Modula-2, and C 
compilers. Unfortunately, my C Ware 


DeSmet C compiler is not among them. 

To remedy this, I turned to the other 
face of BRIEF—the macro language 
that allows almost unlimited customiza- 
tion and extension of the editor. I used 
the supplied error-finding macros as a 
guide and wrote my own routine for the 
DeSmet C compiler. This would not be a 
trivial task for someone just starting out 
with the macro language, but it took me 
only 45 minutes. 

A BRIEF macro, unlike those for 
some editors, looks just like a program in 
a structured, higher-level language. You 
create a macro in a file and compile it 
from within BRIEF. The compiler does 
some syntax checking and creates a to- 
kenized form of the macro so it can be 
executed more quickly. Although the 
process doesn’t encourage quick, off- 
the-cuff creation of macros, it is fast 
enough to write simple macros in just a 
few minutes. 

The macro language includes string 
and integer variables of local and global 


"WINDOWS = 


MENUS = 


scope, loops and conditional structures, 
and macro calls with parameters. Its 
LISP-like syntax, with operator-prefix 
notation and many parentheses, appears 
daunting at first but is not that difficult 
to master. 

It takes somewhat longer to become 
familiar with the various commands or 
primitives at your disposal. Since the 
commands are designed specifically for 
editing, they are not likely to be familiar 
from another language. There is usually 
more than one way to do a particular 
task, so you will probably spend a lot of 
time reading and rereading the reference 
manual. But since when was learning a 
new language easy? 

The macro language documentation 
improved substantially in the new ver- 
sion, with better explanations of concepts 
and a step-by-step walk-through of a set 
of related macros. This will give the new 
user a more solid introduction than did 
the earlier manuals. 

A large number of BRIEF’s standard 
commands are written in the macro lan- 
guage, and the source code for these is 
supplied with the editor. You can learn 


DATA ENTRY= SCREENS = 


HI-SCREEN XL" 


Does your screen management tool include all of this! 


quite a bit from these examples, but it 
will take some perseverance as they are 
lacking in helpful comments. (At least 
half the time needed to write the 
DeSmet C error macro was spent deci- 
phering the original macros.) 

A new féature in v. 2.0, called a re- 
placement macro, allows you to write a 
macro using the same name as one of the 
standard macros, automatically replacing 
it. No big deal, it would seem, except 
your macro can invoke its own name 
and, rather than making a recursive call 
to itself, call the original. This feature 
lets you enhance the standard macros 
without modifying the original code. 

The editor is so powerful as is, with 
features that grow on you the more you 
use them, that most programmers appar- 
ently find little need to create macros. If 
you buy BRIEF for its good basic design 
alone, you can consider its second face, 
the macro language, to be an added 


bonus. | 


By Chris Wolf 


O Unlimited number of screens & windows 1 Full-featured interactive screen editor 
O Windows for menus, data entry, help screens C1 Move/copy/delete/color/draw/undo 
O Pop-up, pull-down and Lotus-like Menus functions 


C1 Up to 26 overlapping wind h CO Merge feature — 
Se et ger et O Online extended-set of characters program 
O1 On-line help management 


Fl ‘Automatic field’checki OC Redefinable function keys O Trace/debug compiled programs 

utomatic field checkin : 

(type/range/format/etc.) ? C1 Data entry test mode under the editor O ie sey in ira aoe een 
O 2 modes for input: field by field/full screen [1 Direct access to DOS from the editor Dy) Use'screens & windows irom ane ale 


files 
CX True ease of use O Print screens with clear data field description 


...and the ability to: 


LJ Capture screens from other applications 
O Call screens for reference from your text editor 
O Modify screens without recompiling your 


O Scrolling capability 


... and does it do all this for all versions of most popular programming languages? 


* If it does, Congratulations: you must be a HI-SCREEN XL™ user! 
-elfit doesni, call or write NOW to order your copy of HI-SCREEN XL™! 


Softway, Inc., PC/Soft Product Line, 500 Sutter St. Ste. 222, San Francisco, CA 94102. Tel. (415) 397-4666. HI-SCREEN XL" is $149.00. S&H $5.00 


for PASCAL, BASIC, C, COBOL, dBASE, FORTRAN, ETC... 
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®OBWOMPRODUCT BINGOWOWOWO 


By Johanna Kleppe 


Each month Product Bingo features the latest in new 
software and hardware products of interest to 
COMPUTER LANGUAGE readers. Send new product 
information to Regina Starr Ridley, Editor, COMPUTER 
LANGUAGE, 500 Howard St., San Francisco, Calif. _ 
94105. ; 


Magma Software’s ME is a reconfigurable text editor with 
a macro language resembling C. ME lets users create new 
editor commands and customize their environments. It has 
multiple windows, regular expressions, line marking, col- 
umn mode, keystroke macros, EGA support, and a remap- 
pable keyboard. $35; $85 for editor plus source code. 

Magma Software, 138-23 Hoover Ave., Jamaica, N.Y. 
11435, (718) 793-5670. 
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Back to basics 
True BASIC’s 2.0 version of the True BASIC language of- 
fers graphics support and modules to facilitate data shar- 
ing between programs. 
True BASIC Inc., 39 South Main St., Hanover, N.H. 
03755, (603) 643-3882. 
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A bright future 


FUTURE86 is a variable-level language that compiles di- 
rectly to machine code and generates compact programs. 
With FUTURE86 you can freely mix assembly language 
and high level statements within procedures. $349 
Development Associates, 1520 S. Lyon, Santa Ana, Ca=” 
lif. 92705, (714) 835-9512. 
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[(Giiises SDE] 
Periscopic vision 
A new hardware-assisted debugger, Periscope III, moni- 
tors the system bus and gives software developers hard- 
ware breakpoint debugging capability. $995 

The Periscope Company Inc., 14 Bonnie Ln., Atlanta, 


Ga. 30328, (404) 256-3860. 
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RESERReoo eT 
Ad lib 


Microsoft’s QuickBASIC users can gain access to high- 
powered data management routines for standard dBASE 
Ill type data base and index files with db/LIB. It allows full 
relational data base management capability for any 
Quick BASIC application program. $139 

A.J.S. Publishing Inc., P.O. Box 379, North Hollywood, 
Calif. 91603, (800) 992-3383 or (818) 985-3383. 
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Native woodchuck 
Woodchuck Industries’ new program for IBM PC and MS- 
DOS compatibles translates native code BASIC to Pascal. 
P-tral translates commercial applications including business 
graphics, scientific, and game software. P-tral comes with 
full documentation and tutorial. $179 

Woodchuck Industries Inc., 340 W. 17th St. #2B, New 
York, N.Y. 10011, (212) 924-0576. 
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Radian Corp. has introduced a new expert system devel- 
opment tool for knowledge-based problems. RuleMaster2 
is an extended version of RuleMaster, adding an end-user 
interface with pull-down menus and windows plus a new 
array data type. It includes two versions for the personal 
computer: RuleMaster2/PC ($495) and RuleMaster2/PCX 
($995); prices effective June 1-August 31. After August 
31, RuleMaster 2/PC: $495, RuleMaster 2/PCX: $1895. 

Radian Corp., 8501 Mo-Pac Blvd., P.O. Box 201088, 
Austin, Tex. 78720-1088, (512) 454-4797. 
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Lattice line-up 
Lattice’s prerelease version of its OS/2 C Compiler has 
mixed memory models, direct calls to the operating sys- 
tem, a reworked library and extended manuals. Until later 
this year, the compiler is available only as an upgrade to 
the Lattice MS-DOS C Compiler at $150. 

Lattice Inc., 2500 S. Highland Ave., Lombard, Il. 
60148, (312) 916-1600. 
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Tree tools 
C:LINES/C:TREE, by SoftRex, is a source code analysis tool 
for programs written in C. The package reformats and 
outlines C source code and produces diagrams illustrating 
the flow of control within the code itself. $59.95 

SoftRex, 4807 Bethesda Ave., Suite 287, Bethesda, 
Md. 20814, (301) 881-8274. 
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The ADAgators are coming! 
Avramatic Industries produces humorous post cards for 
the techie, featuring such characters as the ADAgator and 
the Mouse Adulterated Computer. Printed on glossy pa- 
per, the cards run at $.50 apiece. 

_ Avramatic Industries, P.O. Box 473, Cambridge, Mass. 
02142. 
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NEW! TLIB™ 4.0 
SOURCE CODE CONTROL 
The best keeps getting better! 


e Ver. 3 reviewed in Sept 87 PC Tech Journal! 

The fastest, most powerful system is now even faster! 

e Many new features! Keyword support - inserts date, version, 
history, etc. into source code. Extended wildcard and list- 
of-file support; can create lists by scanning source code for 
includes. Branching support, for multiple development lines. 
Can merge (reconcile) multiple simultaneous changes. 

Keep all versions of a source code file in one compact library. 
Synchronized control of multiple related source files. 

e LAN-compatible! Share libraries with all popular networks. 
Check-in/out locking for multi-programmer projects. 

e Designed for the future! \deal for use with WORM 
optical disks, like the new IBM 3363, since libraries are 
appended, not replaced, when you add new versions. 

e Includes a copy of Landon Dyer’s excellent public domain 
MAKE utility (with source code for DOS & VAX/VMS). 

e Plus: File compare utility. Virtually unlimited source file 
size. Date, comments with each version. Configurable 
user interface, and many configurable options, like: read- 
only libraries, automatic tab/blank conversion, more. 

PC/MS-DOS 2.x &3.x Just $99.95 + $3 s/h Visa/MC 

BURTON SYSTEMS SOFTWARE 
P. O. Box 4156, Cary, NC 27519-4156 
(919) 469-3068 


CIRCLE 83 ON READER SERVICE CARD 


db PASCAL $29.95 


+ SHIPPING 


Read, write and create dBase III and 
compatible data files from Turbo Pascal 

programs. Allows dBase reporting with turbo 
speed and power. Accesses dBase fields using 
dBase field names. 


db DOS $39.95 


+ SHIPPING 


Read and write dBase III and compatible data 
files from the DOS prompt. Allows fast, full 
screen data file editing and will query all 
directory files for dBase compatibility and 
much more. 


2 i Box 1267 
| G cP Chandler, Ari 
lOGICTATH sneer 
Phone orders 1-800-433-6854 accept Visa/ 
Mastercard. For information call (602) 


435-2370. Shipped by ground worldwide for 
$2.50 on receipt of funds. COD extra. 
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INTEL HEX CODE GENERATION 
& *& & * OBJ2HEX * * * * 


@ MS-DOS/PC-DOS Linker to produce 
INTEL MCS-86 format HEX files 
directly from Microsoft format Object 
and Library Files. 


@ Runs on any MS-DOS/PC-DOS terminal, 
@® Programs written in Fortran, C, 
Assembler and other languages can be 
linked to produce desired HEX code. 


@ Segmented HEX file storage for 
selective loading and PROM setting. 


@ Choice of four ways to group file 
segments and specify a physical 
location in target system memory. 


@® Complete warning and error message 
menu to aid in program translation. 


@ Price $99.00 
For complete details, call or write: 


CONTROL PROCESS, P.O. BOX 8080, 
DAVENPORT, IOWA 52809 (319) 391-2992 
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OPT-TECH SORT™ 


Sort/Merge/Select Program 
for the IBM-PC and Compatibles 
New Version 3.0 with 
Btrieve & dBASE support 
e High performance assembly language 

e Sort multiple files on multiple keys 

e Filesize limited only by disk space 

e Select records on up to 10 keys 

e Output records can be reformatted 

e Supports many filetypes and datatypes 

e Can be CALLed or used stand-alone 

e $149 — Visa, MC, Amex, COD, or PO 
Quantity discounts available. 

To order or to receive more 
information call or write: 


Opt-Tech Data Processing 


P.O. Box 678, Zephyr Cove, NV 89448 
(702) 588-3737 
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You can reach 55,000 
software developers with 
your ad in the new 


COMPUTER LANGUAGE 
CLASSIFIED CONNECTION 
This specially designed 
section offers you the easiest, 


most economical way to 
reach technical computer 
product buyers— 
at low, low rates! 


Call now to reserve your space 
in the November 
CLASSIFIED CONNECTION 


Linda Pizzotti Gina Dalpra 
(617) 232-5470 (216) 493-8733 


== The WindowBOSS == 


Pop-up windows, pull down menus, status lines, and 

in context online help can be easily implemented. Your 
applications can drag windows around the screen and 
automatically sense the installed video card -- all this 
without snow, flicker or delay! 


Tim Parker's column in the Feb. 1987 issue of 
Computer Language stated "the ease of use will cause 
some programmers to go overboard with windows", 
and "if you are a die-hard C programmer looking for a 
useful, license-free product, this is it”. 


COMPILERS SUPPORTED 


Borland, Microsoft, 
Lattice, Computer Innovations, 
Datalight, Mark Williams Lets C 


The Window BOSS supports PC/MSDOS for 
IBM PC/XT/AT and Compatibles 


The Window BOSS will accelerate the development of system 
and application programs in the "C" Language. The BOSS will 
let you create programs that have the same look and feel as the 
top selling spreadsheet, database, and windowing products. 
All this and source code too for only $50.00 (Shareware disk 
$15.00). 
Star Guidance Consulting, Inc. 
273 Windy Drive, Waterbury, CT 06705 


(203) 574-2449 
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TRANSLATOR 


Translate your BASIC source programs 
to Pascal source. P-tral, now available 


for the IBM PC and compatibles, will 
translate MS—BASIC/BASICA to Turbo 
Pascal 
(Req Dos 2.0 or later w/ANSI.SYS). 
Also available for-the Apple II series 
(incl. IGS) and converts Applesoft to 
Apple Pascal. 

(212) 206-6490 / 924-0576 


WOODCHUCK INDUSTRIES 
340 WEST 17TH STREET (#2B) 
NEW YORK, NY 10011 
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Windowing System for 
PCs and ASCII Terminals 


Supports: 


- overlapping frames 

- resizing and moving frames/panels 
- user-definable borders 

- scrolling in all directions 


- plus many more powerful features. 


Compatible with UNIX System-V curses. 


Includes TIC/TOC, software to describe 
various ASCII terminals. 


PROGRAM $199. SOURCE (in C) $299. 


Includes two manuals with examples and tutorial. 
No licensing fees. Check, Visa, Amex welcomed. 


Call (416) 842 - 6873 


Parkridge Computer Systems Inc. 


Oakville Corporate Center 
Oakville, Ontario, Canada L6K 3V7 


Prices quoted in US Funds. Dealer Inquiries Welcomed. 
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Introductory Offer: $89.50 prepaid, Visa, MC, COD 


dNPL’/ Reporter 


A Fourth Generation Relational 
Report Writing System for dBase files 
with its own full screen editor 
dNPL is the Non-Programmer's Language 
for the Business Professional 


@ Tabular and matrix reports, mailing labels, forms, letters 
Interactive query for testing data and report options 
Simple, English-like, SQL-like sentences 


@ Records selected by multi-function criteria, with values, 
ranges, strings, wild cards 


@ Up to 10 nested grouping levels with subtotals 
Summaries with row and column totals, average, min, max, 
avg-sum-of-the-squares 
Cross-footing with computed totals 


@Combined sort keys up to 512 characters 
Very fast RAM sort, with disk merge for largest files 
Matrix reports sorted across page by one variable, down 

page by others 

@ Up to 255 memory variables 3. 
Up to 255 database & defined variables 
Trigonometric, date, string, sqr, sqrt, In, exp functions 
Unlimited math expressions & nested If...Then...Else logic 
Comparisions between successive records 


@ Link up to 8 databases - aBase |I, dBase Ill, ascii files 


White your first report within minutes 


DATABASE APPLICATIONS, wc. 


400 Wall Street» Prmceton NJ 08540 +609-924:2900 
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S ALP TENS: VS 
A VIRTUAL MEMORY MANAGER FOR THE PC 


Sapiens V8 is a virtual memory manager for C programmers on 
the IBM PC. The unique design of the virtual memory paging 
storage scheme makes it an invaluable tool for C programmers. 
) With an 8 mg. workspace and stack and heap libraries Sapiens 
V8 solves the problems and hazards of stack and heap overflow. 


Sapiens V8 brings the power, soeed: and complexity of a main- 
frame virtual memory manager to the PC. Sapiens V8 virtual 
memory manager emulates a 80386 memory management 
system and is fully implemented in software. It is not dependent 
on add-on boards or special chips. 


e Provides 8 mgs. virtual memory workspace 
e Fast: less than 40% speed overhead 
e Advanced software emulation of 64-bit architecture 
_ © Virtual stack and heap: multiple return values, 
stack frame management. (vmalloc( )). 


System requirements: Huge model C compiler (Microsoft, Lattice, 
Aztec). V8 uses 22-128 Kb core. Hard disk recommended. 


LIST: $300.00 (408) 458-1990 
Sapiens Software Corporation, P.O. Box 7720, Santa Cruz, CA 95061 
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The index on this page is provided as a service to our readers. The 
publisher does not assume any liability for errors or omissions. 


And some of our well-known customers would be just as 
surprised if they saw themselves in this ad. We don’t splash 
their names all over the place as a matter of professional 
courtesy. 


Let’s face it. Just because someone else uses a product is 
not reason enough to buy it. The clincher is that our 
programs run a documented 40% faster than the closest 
competitor. To complete the picture, our code is up to 
75% smaller due to efficient coding 

and the granularity 
| of functions. 


However, should 
curiosity get the best 
of you, call us at 
201-762-6965 and 
we'll drop a few 
highly impressive 
names on you. 
Behind every 
great program is a great library. 


Draw Your Own Conclusions 
When you're responsible for a project that includes 
advanced graphics, “graphics windowing; or character 
font manipulation, Essential Graphics is the clear choice. 
We’ve taken the grind out of graphics programming and 
replaced it with speed and versatility. 


No Royalties, 30 Day Guarantee 


We believe that selling you a programming tool does not 
make us your co-authors. So we don’t charge any royalties 
or run time fees. If within 30 days you don’t find our 
library satisfactory, dump the whole thing and receive a 
complete refund. 


~ You'd Be Surprised Who Uses 
Essential Graphics Functions 


aie 


Functions At A Glance 
Graphics Adapters: 
e IBM Color Graphics 


Features: 
© Fastest functions available 


Pies, Bars 
e Manipulate character fonts 
© Move blocks, do animation 
e User definable patterns 
© Seed filling in a boundary 
© Clipping on screen 
coordinates 


Hercules Graphics 

AT&T, Olivetti Graphics 

Tecmar Graphics Master 

Others (Call) 

Compiler Compatibility: 

© Microsoft, C, Fortran, 
Pascal 

© Lattice C, Aztec C 


e Computer Innovations 
C86, DeSmet C 
© Wizard C, Mark Williams 


$250.00 


Devices Supported: 

e IBM, Epson, Oki printers 
e HP Plotters, HP Laser Jet 
Ne © Microsoft, Logitech Mice 


Do Your Homework 
The library you buy can influence the rest of your 
programming life. We encourage you to do some checking 
before making a decision. When you’ve done your home- 
work, you'll choose Essential. Call our support staff of 
experienced C programmers and find out before you buy 
how things will be after your check clears. 


To order or for support 
call: 201-762-6965 


- For foreign orders contact: 


England: Gray Matter Tel. (0364) 53499 
Japan: Lifeboat Inc. of Japan Tel: 293 4711 
West Germany: Omnitex Tel. 07623-61820 


Essential Software, Inc. 


PO. Box 1003, Maplewood, New Jersey 07040 
CIRCLE 91 ON READER SERVICE CARD 


© Dots, Lines, Circles, Arcs, e IBM Enhanced Graphics [~~~ 


¥ TING THE DIFFERENCE BETWEEN © 
[MING. 


re citi: ae 


* a_i 5 Ps Ee ee 
ie Hs $0, Br ‘tho really. izT’se a 


\ Pp orogr muming 
” pu cart Jowithout die 


i, sertece level 


| ‘ag ae esd. 
oi , fys awant ut the 


‘Let's C is an inex- 
pensive. high-quality 
programming package... 
with alt the tools you will 
need to creaie applications.” 


Ber 4,00 and flex- ~ 3 
hee ty or &, stat with tne ‘Wiliam G. Wong, BYTE, 
Ay oleleean pilex, Let's C. Angust 1986. 

Loh utilities, editor, compil- “The performance and 
bk ne's eed eu fast, dense documentation of the $75 
' Let’s C compiler rival those 
\ of C compilers for the PC 

currently being sold for 


” 


at | $500... highly reconmngliil 9 
LIMITED TIME —Marty Franz, PC TECH JOURNAL, August 1986. 


i 


OFFER. 5 “cad is close to the ideal debugging environ- 
FREE csd MF ment...a definite aid to izarning C and an 

WITH LET’S Cc “| indispensable tooi for program development.” 

—William G. Wong, BYTE) August 1986. 


ore S3cause even the fastest compiler 
uu bags. You néed t tne revolutionary C 


ies = 


5 yu 15 12 tine consuming frus- 
; a 18,01 debugs ng are lou duinps ana ciunky 
“assert pier. Wi he a¥ou dctvally debug in €. You learn 
. Asiot Demiuse you wach your prograni run in C. You 


wel do eis Hs@niqus’ compiler”: 
SecHs) : ‘Mocro/Systems Journal Apri, 1986 


« fmish waste: becarse esd combmes theispeed of a compiler ay Sehr RT TOR THIS SE THERE'S NO 
»v ch the ipteractive adver igs of an vnterpreter. The end art * RE rears any TRO Dee we 
pleWut? Developmenttime ts Sliced in half. re 


we) > <a C7EL lity you weea } eden LO vel Editing source 
LFY’S CANO asa TEATURES “Oy, level Cebuzzing. On top oft all, -eM) C and esd are today’s 
<e Forite IBMM-PU and Compatibes Sd estvaucs processional © prograsaming tools. And 
No copy; rotected is west reliabie Mark: Willianis C compilers have been sold 
Sieve Benehavark with DEC, Intel and Wang computers since 1981. 


‘Consoiie ume 1 seconds) _—— a 


Levs%. 2.8 (On 812K 6Mh7 (BM-Ar) 560 0 DAYM! MONEY BACK GUARANTEE 


Tirde @73.88 (As eae) 


' Mari: Williams ives yot.a iull 00 days to find out just 


= 


; r 

; a" te 
" c oe 476 qt ME, 

Hs © ueT sensing a0 ean 8M va el sf itera! Me 00d Les Cand esd real re ~or your mouey back. 
a ‘ ut. a oy ‘ in SOUFGE CO.'2, Nr Sou you want fooré thac afast compiler -1 yon want 

te yd oR en 

& +: ic {0s ok comet a a tof var eetssiorile your programs up and running iast, ask for Let’s C and 
ie: + New Ae ullly a a oe ‘ae '. esd You'll trd them at your software dealer's, in the soit- 

tt ") vay, code plus et.ster ® Dus NGi Chane proaram spee : 
,. Seo ORES ee eee! race depar ent 9 your favorite booxstore, through the 
Bae ang Tawa Cott ie eae Hapress Prograni av oves S500 Radio Shaeks or you can 
aT, uation, wrogrem fg histoi j 3 = / 
& § vind ws order now by cailiag 2-e50 TM WS-1700- 
ie Ona | *), Tingis cell, 1-312-472-6059. 
§ Mark 

- dy williams 

Company r 


1430 West Wrighiwcod, Chicago, illinois 60614 


Let's Cis a re: sis fliams Company. 


Ma 
of Beli Lab. 


AND C5. ONLY 319 EACH. 


BAVICE CARD * 


TINTS is 4 a i 


_ 


3 Heh 
Hide Ee Oe. 


sey bg ee 
ARK WL 


ah TEE “GS verful and sophistic ated debugger built on.a 


“¥ “A 


a 


